diff options
Diffstat (limited to 'tests/008/mdo.txr')
| -rw-r--r-- | tests/008/mdo.txr | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/008/mdo.txr b/tests/008/mdo.txr new file mode 100644 index 00000000..dbc8b50c --- /dev/null +++ b/tests/008/mdo.txr @@ -0,0 +1,7 @@ +@(mdo (defvar a)) +@(mdo (push 1 a)) +@(define foo) +@ (mdo (push 2 a)) +@(end) +@(foo) +@(do (assert (equal a '(2 1)))) |