Line | |
---|
1 | <!-- test.html - HTML for test-page --> |
---|
2 | |
---|
3 | <html> |
---|
4 | <head> |
---|
5 | <script src="spock-runtime.js" type="text/javascript"> |
---|
6 | </script> |
---|
7 | <script type="text/javascript"> |
---|
8 | function cleanup(str) { |
---|
9 | return str.replace(new RegExp("<", "g"), "<"); |
---|
10 | } |
---|
11 | |
---|
12 | function dowrite(str) { |
---|
13 | var node = document.createElement("span"); |
---|
14 | var lines = str.split("\n"); |
---|
15 | var html; |
---|
16 | |
---|
17 | if(lines.length == 1) |
---|
18 | html = "<tt>" + cleanup(str) + "</tt>"; |
---|
19 | else { |
---|
20 | html = "<tt>" + cleanup(lines[ 0 ]) + "</tt>"; |
---|
21 | |
---|
22 | for(var i = 1; i < lines.length; ++i) |
---|
23 | html += "<br/><tt>" + cleanup(lines[ i ]) + "</tt>"; |
---|
24 | } |
---|
25 | |
---|
26 | node.innerHTML = html; |
---|
27 | document.body.appendChild(node); |
---|
28 | } |
---|
29 | |
---|
30 | function runTests() { |
---|
31 | if(!("SPOCK" in this)) { |
---|
32 | setTimeout(runTests, 1000); |
---|
33 | return; |
---|
34 | } |
---|
35 | |
---|
36 | SPOCK.stdout = new SPOCK.Port("output", { write: dowrite }); |
---|
37 | SPOCK.stdout.name = "document"; |
---|
38 | SPOCK.stderr = SPOCK.stdout; |
---|
39 | var files = ["library-test.js", |
---|
40 | "0001-loop.js", |
---|
41 | "0002-fac.js", |
---|
42 | "0003-r4rstest.js" , |
---|
43 | "0004-r5rs-pitfalls.js", |
---|
44 | "0006-ec-test.js" |
---|
45 | ]; |
---|
46 | function chain(i) { |
---|
47 | if(i >= files.length) dowrite("finished.\n"); |
---|
48 | else { |
---|
49 | dowrite("\n=================================== " + files[ i ] + "\n"); |
---|
50 | SPOCK.load(files[ i ], function() { chain(i + 1); }); |
---|
51 | } |
---|
52 | } |
---|
53 | |
---|
54 | chain(0); |
---|
55 | } |
---|
56 | </script> |
---|
57 | </head> |
---|
58 | <body onLoad="runTests();"> |
---|
59 | </body> |
---|
60 | </html> |
---|
Note: See
TracBrowser
for help on using the repository browser.