make tests green again

This commit is contained in:
Araq 2017-11-23 14:37:53 +01:00
commit 14468e2336
2 changed files with 5 additions and 12 deletions

View file

@ -1050,7 +1050,12 @@ proc semProcTypeNode(c: PContext, n, genericParams: PNode,
result.flags.incl tfIterator result.flags.incl tfIterator
# XXX Would be nice if we could get rid of this # XXX Would be nice if we could get rid of this
result.sons[0] = r result.sons[0] = r
let oldFlags = result.flags
propagateToOwner(result, r) propagateToOwner(result, r)
if oldFlags != result.flags:
# XXX This rather hacky way keeps 'tflatmap' compiling:
if tfHasMeta notin oldFlags:
result.flags.excl tfHasMeta
result.n.typ = r result.n.typ = r
if genericParams != nil and genericParams.len > 0: if genericParams != nil and genericParams.len > 0:

View file

@ -1,12 +0,0 @@
discard """
output: "bla"
"""
import macros
proc makeMacro: NimNode =
result = nil
var p = makeMacro()
echo "bla"