diff options
| author | Drahflow <drahflow@gmx.de> | 2012-12-10 14:30:07 +0100 |
|---|---|---|
| committer | Drahflow <drahflow@gmx.de> | 2012-12-10 14:30:07 +0100 |
| commit | 26c5b2be3918e7e27f9ae0616f3a3a629190b19c (patch) | |
| tree | 9fe1e3b4631e460acbc5d92c62dab176cfdca5a5 /examples/non-working | |
| parent | 9de23daca3f223643eb4d0f92636d72d0f5c9364 (diff) | |
Quicksort
Diffstat (limited to 'examples/non-working')
| -rw-r--r-- | examples/non-working/cat.ey | 13 | ||||
| -rw-r--r-- | examples/non-working/macro.ey | 51 | ||||
| -rw-r--r-- | examples/non-working/tokens.ey | 5 |
3 files changed, 0 insertions, 69 deletions
diff --git a/examples/non-working/cat.ey b/examples/non-working/cat.ey deleted file mode 100644 index 23b5786..0000000 --- a/examples/non-working/cat.ey +++ /dev/null @@ -1,13 +0,0 @@ -#!/usr/bin/env elymas - -/stdlib import - -4096 malloc =buf -0 =len - -0 \argv 0 open =f -{ - f buf 4096 read =len - f buf len write -} len while -f close diff --git a/examples/non-working/macro.ey b/examples/non-working/macro.ey deleted file mode 100644 index fdaf0cf..0000000 --- a/examples/non-working/macro.ey +++ /dev/null @@ -1,51 +0,0 @@ -# an alternative to }, moving the top stack element -# into closure storage and pushing it back before -# executing the block - -{ "}" | * - { /f deff /x defv - { x f } - } quoted { } { * } ? * -} "}0" defq - -5 { { dump }0 } * /dumpfive deff -5 { dump }0 /dumpfivetwo deff - -7 dumpfive - -7 dumpfivetwo - - - -# import members of other objects into local scope - -{ - "_" | "-021" | ".|" | "-01" | |deff -} /usef defq - - -# codewalker - -{ "lol" dump } /lol deff - -{ - 1 /cont defv - - { cont } { 0 { - exe /walkelem deff - { sys .out .writestr } /out deff - - _ { { " " out } rep }0 /indent deff - { 2 add walkelem }0 /walk deff - - _ code [ { - indent [ "\"" -102 "\"\n" ] |out each - } { - indent _ sym _ out - "{" streq { 0 =cont |lol } { - } ? * - "\n" out - } { - blk |walk each - } ] * * - } * } loop -} /codewalk defq - -{ f "t" g h { a b { c d } e } codewalk } * diff --git a/examples/non-working/tokens.ey b/examples/non-working/tokens.ey deleted file mode 100644 index 24ba14e..0000000 --- a/examples/non-working/tokens.ey +++ /dev/null @@ -1,5 +0,0 @@ -< - { dump } /a deff -> /std defv - -"dump" std .a |
