megatest can be executed

This commit is contained in:
Arne Döring 2018-12-03 19:12:59 +01:00 • committed by Araq
commit 2a4c09ff88
22 changed files with 150 additions and 130 deletions

45
tests/vm/tmitems_vm.nim Normal file
View file

@ -0,0 +1,45 @@
discard """
nimout: '''13'''
output: '''3
3
3'''
"""
# bug #3731
var list {.compileTime.} = newSeq[int]()
macro calc*(): typed =
list.add(1)
for c in list.mitems:
c = 13
for c in list:
echo c
calc()
# bug #3859
import macros
macro m: typed =
var s = newseq[NimNode](3)
# var s: array[3,NimNode] # not working either
for i in 0..<s.len: s[i] = newLit(3) # works
#for x in s.mitems: x = newLit(3)
result = newStmtList()
for i in s:
result.add newCall(bindsym"echo", i)
m()
# bug 4741 & 5013
proc test() =
var s = [("baz", 42), ("bath", 42)]
for i in s.mitems:
i[1] = 3
doAssert(s == [("baz", 3), ("bath", 3)])
static:
test()
var s = [("baz", 42), ("bath", 42)]
for i in s.mitems:
i[1] = 3
doAssert(s == [("baz", 3), ("bath", 3)])