Chromium Code Reviews
chromiumcodereview-hr@appspot.gserviceaccount.com (chromiumcodereview-hr) | Please choose your nickname with Settings | Help | Chromium Project | Gerrit Changes | Sign out
(4)

Side by Side Diff: ports/gambc_ppapi/index.html

Issue 150413008: Initial support for gambit-scheme v4.7.0 Base URL: https://chromium.googlesource.com/external/naclports.git@master
Patch Set: Add support for pnacl Created 6 years, 10 months ago
Use n/p to move between diff chunks; N/P to move between comments. Draft comments are only viewable by you.
Jump to:
View unified diff | Download patch
« no previous file with comments | « ports/gambc_ppapi/icon_48.png ('k') | ports/gambc_ppapi/main.c » ('j') | no next file with comments »
Toggle Intra-line Diffs ('i') | Expand Comments ('e') | Collapse Comments ('c') | Show Comments Hide Comments ('s')
OLDNEW
(Empty)
1 <!DOCTYPE html>
2 <html>
3 <head>
4 <title>Gambit Scheme Interpreter</title>
5 <META HTTP-EQUIV="Pragma" CONTENT="no-cache" />
6 <META HTTP-EQUIV="Expires" CONTENT="-1" />
7
8 <script type="text/javascript" src="hterm.concat.js"></script>
9 <script type="text/javascript" src="naclterm.js"></script>
10 <script type="text/javascript" src="gambc.js"></script>
11
12 <style type="text/css">
13 #terminal {
14 position: relative;
15 display: block;
16 width: 95%;
17 height: 600px;
18 }
19 </style>
20 </head>
21 <body>
22 <p><b>Gambit Scheme Interpreter</b></p>
23 <p>This example shows the Gambit Scheme interpreter running in Native Client . By
24 default it runs the an interactive REPL (Run Eval Print Loop), but can also
25 run Gambit Scheme files from its virtual file system. ( Uploaded files locat ed at
26 /mnt/html5 ) </p>
27 <input type="file" id="upload" multiple="multiple" onchange="uploadFiles" />
28 <div id="terminal"></div>
29 <button onclick='term_.onVTKeystroke("(load \"/mnt/http/pi\")\r(time (pi 100 00))\r")'>10000 digits of &pi;</button>
30 <button onclick='term_.onVTKeystroke("(directory-files \"/\")\r")'>list file s</button>
31 <button onclick='term_.onVTKeystroke("(define (f x) (+ 0.5 (/ 1 x)))\r(trace f)\r(f 5)\r(f 0)\r,be\r,(c 3)\r");'>simple debugging</button>
32 </body>
33 </html>
OLDNEW
« no previous file with comments | « ports/gambc_ppapi/icon_48.png ('k') | ports/gambc_ppapi/main.c » ('j') | no next file with comments »

Powered by Google App Engine
This is Rietveld 408576698