implements/fixes #195

This commit is contained in:
Araq
2012-09-22 23:09:25 +02:00
parent 759b3201ad
commit ea4435544e
2 changed files with 3 additions and 3 deletions

View File

@@ -184,8 +184,7 @@ proc genItem(d: PDoc, n, nameNode: PNode, k: TSymKind) =
var kind = tkEof
var comm = genRecComment(d, n) # call this here for the side-effect!
var r: TSrcGen
initTokRender(r, n, {renderNoPragmas, renderNoBody, renderNoComments,
renderDocComments})
initTokRender(r, n, {renderNoBody, renderNoComments, renderDocComments})
while true:
getNextTok(r, kind, literal)
case kind

View File

@@ -1115,7 +1115,8 @@ proc gsub(g: var TSrcGen, n: PNode, c: TContext) =
putWithSpace(g, tkContinue, "continue")
gsub(g, n.sons[0])
of nkPragma:
if not (renderNoPragmas in g.flags):
if renderNoPragmas notin g.flags:
put(g, tkSpaces, Space)
put(g, tkCurlyDotLe, "{.")
gcomma(g, n, emptyContext)
put(g, tkCurlyDotRi, ".}")