@@ -147,6 +147,13 @@ (assert_equal 0 a) (assert_throws "NuUndefinedSymbol" b)) + (imethod (id) testEvalExceptionMacro is + ;; Make sure a runtime exception is properly caught + (set code '(+ 2 x)) + + (macro-1 eval-it (sexp) `(eval ,sexp)) + (assert_throws "NuUndefinedSymbol" (eval-it code))) + (imethod (id) testMaskedVariablesMacro is (macro-1 x (a b) `(+ ,a ,b)) test/test_macrox.nu 50b2dea243072add2e14ead5fef3dd39cb68d79f f4dbe16444b077c71563c1f551a9b01b2c655f15 Tim Burks tim@neontology.com http://github.com/timburks/nu/commit/2a54680b7d43fd4479e7900f693fdc9ab188b252 2a54680b7d43fd4479e7900f693fdc9ab188b252 2009-05-30T22:52:54-07:00 2009-05-30T22:52:54-07:00 Merge branch 'master' of git://github.com/itfrombit/nu 6d8c133f84d68d3347b96d5c797e4173670af9a5 Tim Burks tim@neontology.com