DLLs should work again; fixes #169

This commit is contained in:
Araq 2012-07-24 01:14:21 +02:00
commit ed915a309e
12 changed files with 29 additions and 410 deletions

View file

@ -25,3 +25,10 @@ proc newOp(k: TNodeKind, a, b: PNode): PNode {.exportc: "newOp", dynlib.} =
proc buildTree(x: int): PNode {.exportc: "buildTree", dynlib.} =
result = newOp(nkMul, newOp(nkAdd, newLit(x), newLit(x)), newLit(x))
when false:
# Test the GC:
for i in 0..100_000:
discard buildTree(2)
echo "Done"