diff options
author | Araq <rumpf_a@web.de> | 2011-03-08 01:59:15 +0100 |
---|---|---|
committer | Araq <rumpf_a@web.de> | 2011-03-08 01:59:15 +0100 |
commit | fa332b729835f70c71ee235626490697779fee87 (patch) | |
tree | e6e7039e25fdd73f22bde845e1b02e8b0ded2a5a /tests | |
parent | f9c6cec90c1a67e885b6172a8bccfb014175f60b (diff) | |
download | Nim-fa332b729835f70c71ee235626490697779fee87.tar.gz |
fixes #13; fixes #18
Diffstat (limited to 'tests')
-rw-r--r-- | tests/accept/run/tmacro2.nim | 27 | ||||
-rw-r--r-- | tests/accept/run/tmacro3.nim | 31 |
2 files changed, 58 insertions, 0 deletions
diff --git a/tests/accept/run/tmacro2.nim b/tests/accept/run/tmacro2.nim new file mode 100644 index 000000000..6aa9bb57d --- /dev/null +++ b/tests/accept/run/tmacro2.nim @@ -0,0 +1,27 @@ +discard """ + output: "ta-da Your value sir: 'HE!!!!o Wor!!d'" +""" + +import macros, strutils + +proc testBlock(): string {.compileTime.} = + block myBlock: + while true: + echo "inner block" + break myBlock + echo "outer block" + result = "ta-da" + +macro mac(n: expr): expr = + expectKind(n, nnkCall) + expectLen(n, 2) + expectKind(n[1], nnkStrLit) + var s: string = n[1].strVal + s = s.replace("l", "!!") + result = newStrLitNode("Your value sir: '$#'" % [s]) + +const s = testBlock() +const t = mac("HEllo World") +echo s, " ", t + + diff --git a/tests/accept/run/tmacro3.nim b/tests/accept/run/tmacro3.nim new file mode 100644 index 000000000..fa2040e92 --- /dev/null +++ b/tests/accept/run/tmacro3.nim @@ -0,0 +1,31 @@ +discard """ + output: "" +""" + +import macros + +type + TA = tuple[a: int] + PA = ref TA + +macro test*(a: stmt): stmt = + var val: PA + new(val) + val.a = 4 + +test: + "hi" + +macro test2*(a: stmt): stmt = + proc testproc(recurse: int) = + echo "Thats weird" + var o : PNimrodNode = nil + echo " no its not!" + o = newNimNode(nnkNone) + if recurse > 0: + testproc(recurse - 1) + testproc(5) + +test2: + "hi" + |