diff options
Diffstat (limited to 'examples/working-compiler/scope-emulation.test')
| -rw-r--r-- | examples/working-compiler/scope-emulation.test | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/examples/working-compiler/scope-emulation.test b/examples/working-compiler/scope-emulation.test new file mode 100644 index 0000000..703d07a --- /dev/null +++ b/examples/working-compiler/scope-emulation.test @@ -0,0 +1,19 @@ +"canary" +< { -- -- "here: ?" dump } "#?" deffd > /foo /bar ? +_ dump +< { "here: *" dump } "#*" deffd > * +_ dump +< { "here: =[]" dump } "#=[]" deffd > =[] +_ dump +< { "here: len" dump } "#len" deffd > len +_ dump +/foo < { "here: cat (with: " -01 cat ")" cat dump } "#cat" deffd > cat +_ dump +< { "here: -01 cat (with: " -01 cat ")" cat dump } "#-01 cat" deffd > /foo cat +_ dump +< { -- "here: each" dump } "#each" deffd > { "xxx" die } each +_ dump +< { "here: dom" dump } "#dom" deffd > dom +_ dump +< { "here: *" dump } "#*" deffd > 0 ! +_ dump |