From fcf8d45ad01cc8421469defd5be6a2a31b418c8a Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Tue, 25 Aug 2015 23:29:41 -0400 Subject: [PATCH] Tweaked tests --- test2.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/test2.scm b/test2.scm index a5c178f1..a782b145 100644 --- a/test2.scm +++ b/test2.scm @@ -43,8 +43,8 @@ ;; because it would need to extend it. ;; could eval expose a function to extend the global env (or any env)? (test 1 2 3) - ;(test 1 2 3) ; breaks - ;(my-or 1 2 3) ; breaks + (test 1 2 3) ; breaks + (my-or 1 2 3) ; breaks (and ''test ''test2)))) (write (test2 1 2 3)) @@ -59,4 +59,4 @@ (write (eval 'my-or)) (write - (eval '(my-or 1 2 x))) + (eval '(my-or x 1 2 x)))