diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2012-02-25 18:25:55 -0800 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2012-02-25 18:25:55 -0800 |
| commit | 581d591c4f6d8ed995fcc52cf692953ff6d8b517 (patch) | |
| tree | 294ded1c38ec68541944f6282b32403f04cc3eb2 | |
| parent | 306d30c4b652fc3811d0a82b59d0cc5a8b58cfdf (diff) | |
| download | txr-581d591c4f6d8ed995fcc52cf692953ff6d8b517.tar.gz txr-581d591c4f6d8ed995fcc52cf692953ff6d8b517.tar.bz2 txr-581d591c4f6d8ed995fcc52cf692953ff6d8b517.zip | |
* tests/008/filtenv.expected: New file.
* tests/008/filtenv.txr: New file.
| -rw-r--r-- | ChangeLog | 6 | ||||
| -rw-r--r-- | tests/008/filtenv.expected | 2 | ||||
| -rw-r--r-- | tests/008/filtenv.txr | 5 |
3 files changed, 13 insertions, 0 deletions
@@ -1,5 +1,11 @@ 2012-02-25 Kaz Kylheku <kaz@kylheku.com> + * tests/008/filtenv.expected: New file. + + * tests/008/filtenv.txr: New file. + +2012-02-25 Kaz Kylheku <kaz@kylheku.com> + Bug #34652 * match.c (do_txeval): Establish a dynamic env frame around diff --git a/tests/008/filtenv.expected b/tests/008/filtenv.expected new file mode 100644 index 00000000..7d74be84 --- /dev/null +++ b/tests/008/filtenv.expected @@ -0,0 +1,2 @@ +a="x" +b="x" diff --git a/tests/008/filtenv.txr b/tests/008/filtenv.txr new file mode 100644 index 00000000..062e3a7a --- /dev/null +++ b/tests/008/filtenv.txr @@ -0,0 +1,5 @@ +@(bind a "x") +@(define f (in out)) +@(bind out a) +@(end) +@(bind b `@{a :filter (:fun f)}`) |