diff options
Diffstat (limited to 'tests/019/redef.tl')
-rw-r--r-- | tests/019/redef.tl | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/tests/019/redef.tl b/tests/019/redef.tl new file mode 100644 index 00000000..036fb8c9 --- /dev/null +++ b/tests/019/redef.tl @@ -0,0 +1,19 @@ +(load "../common") + +(defun foo () :foo) + +(defvar foov :foov) + +(defun bar () (list (foo) foov)) + +(compile 'bar) + +(test (bar) (:foo :foov)) + +(defun foo () :bar) + +(makunbound 'foov) + +(defparml foov :barv) + +(test (bar) (:bar :barv)) |