path: root/tests/vm/tcompiletimetable.nim

discard """
  msg: '''2
3
4:2
  '''
"""

# bug #404

import macros, tables

var ZOOT{.compileTime.} = initTable[int, int](2)
var iii {.compiletime.} = 1

macro zoo:stmt=
  zoot[iii] = iii*2
  inc iii
  echo iii

zoo
zoo


macro tupleUnpack: stmt =
  var (y,z) = (4, 2)
  echo y, ":", z

tupleUnpack

# bug #903

import strtabs

var x {.compileTime.}: PStringTable

macro addStuff(stuff, body: expr): stmt {.immediate.} =
  result = newNimNode(nnkStmtList)

  if x.isNil:
    x = newStringTable(modeStyleInsensitive)
  x[$stuff] = ""

macro dump(): stmt =
  result = newNimNode(nnkStmtList)
  for y in x.keys: echo "Got ", y

addStuff("Hey"): echo "Hey"
addStuff("Hi"): echo "Hi"
dump()