diff options
Diffstat (limited to 'examples')
| -rw-r--r-- | examples/working-compiler/scope-emulation.test | 19 | ||||
| -rw-r--r-- | examples/working/dom.ey | 3 |
2 files changed, 19 insertions, 3 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 diff --git a/examples/working/dom.ey b/examples/working/dom.ey index 1c66a34..4cadf40 100644 --- a/examples/working/dom.ey +++ b/examples/working/dom.ey @@ -1,4 +1 @@ [ 7 7 7 7 7 ] dom dump -< - { 7 } /dom deff -> dom dump |