klisp

commit 931c6e55e070fe1c9a1de58a5d564988d6f38e7a
parent b46bb36551e1d051b3a28c4554cba1f983ecc626
Author: Andres Navarro <canavarro82@gmail.com>
Date:   Fri, 25 Nov 2011 13:57:41 -0300

Temporarily eliminated on error test after having changed the way the error applicative handles arguments.

Diffstat:
M
src/tests/error.k
 | 
5
++++-

1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/src/tests/error.k b/src/tests/error.k
@@ -39,7 +39,10 @@
   ($check equal? (error-object-irritants e1) ())
   ($check equal? (error-object-irritants e2) (list 1 2 3))
   ($check equal? (error-object-irritants e3) ())
-  ($check equal? (error-object-irritants e4) (list 1))
+;; error now uses the standard binding constructs from kghelper
+;; for now they don't encapsulate any data in the error, but
+;; they will in the future
+;;  ($check equal? (error-object-irritants e4) (list 1))
 
   ($check-error (error-object-irritants))
   ($check-error (error-object-irritants e1 e2))