Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-05-24 04:25:06 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Tweaked tests

Browse source
This commit is contained in:
Justin Ethier 2015-08-25 23:29:41 -04:00
parent 9ef1009e1f
commit fcf8d45ad0
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
test2.scm
View file

@ -43,8 +43,8 @@
;; because it would need to extend it. ;; because it would need to extend it.
;; could eval expose a function to extend the global env (or any env)? ;; could eval expose a function to extend the global env (or any env)?
(test 1 2 3) (test 1 2 3)
;(test 1 2 3) ; breaks (test 1 2 3) ; breaks
;(my-or 1 2 3) ; breaks (my-or 1 2 3) ; breaks
(and ''test ''test2)))) (and ''test ''test2))))
(write (test2 1 2 3)) (write (test2 1 2 3))
@ -59,4 +59,4 @@
(write (write
(eval 'my-or)) (eval 'my-or))
(write (write
(eval '(my-or 1 2 x))) (eval '(my-or x 1 2 x)))