mdo.txr « 008 « tests - txr - TXR: A data munging language.

summary refs log tree commit diff stats

path: root/tests/008/mdo.txr

blob: dbc8b50c4b78402ab219866483c25fc6a0c28fd0 (plain)

@(mdo (defvar a))
@(mdo (push 1 a))
@(define foo)
@  (mdo (push 2 a))
@(end)
@(foo)
@(do (assert (equal a '(2 1))))