diff options
| author | Drahflow <drahflow@gmx.de> | 2014-03-11 19:41:09 +0100 |
|---|---|---|
| committer | Drahflow <drahflow@gmx.de> | 2014-03-11 19:41:09 +0100 |
| commit | b4d11704aa33ec6d471479e60be0fdaade5d9b7d (patch) | |
| tree | 07e1c5e0c43b8d3421f14c0adea77c769d6ccdfd /examples/working-compiler | |
| parent | 322d8de9f2d5a4b7159c72d36add03e29dcbe5c2 (diff) | |
Complex data types can now be done
Diffstat (limited to 'examples/working-compiler')
| -rw-r--r-- | examples/working-compiler/mapping.test | 27 |
1 files changed, 0 insertions, 27 deletions
diff --git a/examples/working-compiler/mapping.test b/examples/working-compiler/mapping.test deleted file mode 100644 index cf25036..0000000 --- a/examples/working-compiler/mapping.test +++ /dev/null @@ -1,27 +0,0 @@ -< - { .v -01 . } "#*" defmd - { -- [ 0 ] } "#in" defmd - { -- [ 0 ] } "#out" defmd - { .v keys } "#dom" defmd - { .v ==v =*f v keys { v -01 . f } each } "#each" defmd - { < < { defv }' > ==v "#=[]" =* > } -> -- /map deffd - -map ==m - -0 "foo" m =[] -1 "bar" m =[] -2 "quux" m =[] - -"foo" m * dump -"bar" m * dump -"quux" m * dump - -m dom dump -m { dump } each - -5 m mul ==mm - -"foo" mm * dump -"bar" mm * dump -"quux" mm * dump |