Login
7 branches 0 tags
Ben (X13/Arch) Improved images c93b05c 2 years ago 1123 Commits
nujel / tests / testsuite / compiler.nuj
(:arity-error (try car (macroexpand '(return 1 2 3))))
(:arity-error (try car (macroexpand '(if 1 2 3 4))))
(:arity-error (try car (macroexpand '(def 1 2 3))))
(8 (constant-fold (macroexpand '(+ 1 1 (* 2 3)))))
(21 (compile/for :none '(+ 1 2 3 4 5 6)))
(4 (compile/for :none '(do 1 2 3 4)))
(:type-error (try car (bytecompile '(def #nil #nil))))
(:type-error (try car (bytecompile '(set! #nil #nil))))
(:type-error (try car (bytecompile '(def))))
(:arity-error (try car (bytecompile '(set!))))