aboutsummaryrefslogtreecommitdiff
path: root/examples/working/macro.ey
diff options
context:
space:
mode:
authorDrahflow <drahflow@gmx.de>2012-12-30 14:39:45 +0100
committerDrahflow <drahflow@gmx.de>2012-12-30 14:39:45 +0100
commit047fb919e7a08c7daa5ec4581fc5ab8cf5f25a6f (patch)
tree9e9fac15c1e2c0714467048ae52a90344b9f4522 /examples/working/macro.ey
parentd74d19aee738ba60f584899e9530e9aa98845be2 (diff)
-, _, * now normal functions
Diffstat (limited to 'examples/working/macro.ey')
-rw-r--r--examples/working/macro.ey18
1 files changed, 9 insertions, 9 deletions
diff --git a/examples/working/macro.ey b/examples/working/macro.ey
index fdaf0cf..10c7d3b 100644
--- a/examples/working/macro.ey
+++ b/examples/working/macro.ey
@@ -6,19 +6,19 @@
{ /f deff /x defv
{ x f }
} quoted { } { * } ? *
-} "}0" defq
+} "}_" defq
-5 { { dump }0 } * /dumpfive deff
-5 { dump }0 /dumpfivetwo deff
+5 { { dump }_ } * /dumpfive deff
+5 { dump }_ /dumpfivetwo deff
-7 dumpfive -
-7 dumpfivetwo -
+7 dumpfive --
+7 dumpfivetwo --
# import members of other objects into local scope
{
- "_" | "-021" | ".|" | "-01" | |deff
+ "_" | "021" | "-" | ".|" | "01" | "-" | |deff
} /usef defq
@@ -33,14 +33,14 @@
exe /walkelem deff
{ sys .out .writestr } /out deff
- _ { { " " out } rep }0 /indent deff
- { 2 add walkelem }0 /walk deff
+ _ { { " " out } rep }_ /indent deff
+ { 2 add walkelem }_ /walk deff
_ code [ {
indent [ "\"" -102 "\"\n" ] |out each
} {
indent _ sym _ out
- "{" streq { 0 =cont |lol } { - } ? *
+ "{" streq { 0 =cont |lol } { -- } ? *
"\n" out
} {
blk |walk each