'addSon' for types deprecated for 'int literal type' analysis

This commit is contained in:
Araq 2012-07-09 08:09:00 +02:00
commit 121d4e0fc2
13 changed files with 49 additions and 33 deletions

View file

@ -592,7 +592,7 @@ proc evalAddr(c: PEvalContext, n: PNode, flags: TEvalFlags): PNode =
if isSpecial(result): return
var a = result
var t = newType(tyPtr, c.module)
addSon(t, a.typ)
addSonSkipIntLit(t, a.typ)
result = newNodeIT(nkRefTy, n.info, t)
addSon(result, a)