diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/012/use-as.tl | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/012/use-as.tl b/tests/012/use-as.tl index 681a968d..eb736d9d 100644 --- a/tests/012/use-as.tl +++ b/tests/012/use-as.tl @@ -29,3 +29,11 @@ (use-sym-as 3 '#:foo) :error (use-sym-as 'ldraw 3) :error (use-sym-as 'x 'x) x) + +(mtest + (find-symbol "ldraw") lottery:draw + (find-symbol "gdraw") graphics:draw + (unuse-sym 'ldraw) lottery:draw + (unuse-sym 'gdraw) graphics:draw + (find-symbol "ldraw") nil + (find-symbol "gdraw") nil) |