From 602f27ef4e365eb9a2aa8f3db1e48a3caef030dd Mon Sep 17 00:00:00 2001
From: Danny Yoo <dyoo@hashcollision.org>
Date: Thu, 18 Apr 2013 12:10:17 -0600
Subject: [PATCH] repl tests in place; checking deviations now.

---
 .../js-assembler/runtime-src/baselib-lists.js |  1 -
 whalesong/repl-prototype/htdocs/tests.html    |  3 ++-
 whalesong/repl-prototype/htdocs/tests.js      | 19 +++++++++++--------
 3 files changed, 13 insertions(+), 10 deletions(-)

diff --git a/whalesong/js-assembler/runtime-src/baselib-lists.js b/whalesong/js-assembler/runtime-src/baselib-lists.js
index 52bdad9..9a7f0d0 100644
--- a/whalesong/js-assembler/runtime-src/baselib-lists.js
+++ b/whalesong/js-assembler/runtime-src/baselib-lists.js
@@ -173,7 +173,6 @@
             subelts.push(params.recur(p));
         }
 
-
         if (params.getMode() === 'constructor') {
             if (dottedPair) {
                 node = subelts[subelts.length - 1];
diff --git a/whalesong/repl-prototype/htdocs/tests.html b/whalesong/repl-prototype/htdocs/tests.html
index cb39650..182d8cf 100644
--- a/whalesong/repl-prototype/htdocs/tests.html
+++ b/whalesong/repl-prototype/htdocs/tests.html
@@ -13,8 +13,9 @@
 <p>This page tests the behavior of REPL compilation.</p>
 
 <div id="is-running"></div>
+<br/>
 <div id="failure-index">Failures: </div>
-
+<br/>
 
 </body>
 </html>
diff --git a/whalesong/repl-prototype/htdocs/tests.js b/whalesong/repl-prototype/htdocs/tests.js
index a3385a2..bb8ba20 100644
--- a/whalesong/repl-prototype/htdocs/tests.js
+++ b/whalesong/repl-prototype/htdocs/tests.js
@@ -11,7 +11,7 @@ jQuery(document).ready(function() {
         failureCount++;
         $("#failure-index").css("display", "inline");
         $("#failure-index").append($("<a/>").attr("href", "#fail" + failureCount)
-                                   .text("" + failureCount));
+                                   .text("" + failureCount)).append(' ');
         var failMsgText = " FAIL" + ((e.message || e || '') ? 
                                      ": " + (e.message || e || '') : "");
         $(document.body).append($("<span/>").text(failMsgText)
@@ -46,16 +46,16 @@ jQuery(document).ready(function() {
     };
 
     var runAsyncTest = function(name, f, k) {
-        repl.display("running " + name + "... ");
+        $(document.body).append("running " + name + "... ");
         var success = function() {
-            repl.display(" ok\n")
+            $(document.body).append(" ok").append($("<br/>"));
             k();
         };
         var fail = function(e) {
             noteRedFailure(e);
-	    repl.display("\n");
-	    repl.display(e + '');
-            repl.display('\n');
+	    $(document.body).append($("<br/>"));
+            //	    $(document.body).append(e + '');
+	    //$(document.body).append($("<br/>"));
             k();
         };
         try {
@@ -69,10 +69,13 @@ jQuery(document).ready(function() {
     var queueTest = function(name, code, expectedText) {
         queueAsyncTest(name, function(success, fail) {
             var checkOutput = function(err) {
-                if (outputSpan.text() === expectedText) {
+                var observedText = outputSpan.text().replace(/\n$/, "");
+                if (observedText === expectedText) {
                     success();
                 } else {
-                    fail("not the same: " + outputSpan.text() + 
+                    console.log(err);
+                    console.log(observedText, expectedText);
+                    fail("not the same: " + observedText + 
                          ", " +
                          expectedText);
                 }