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)))