This commit is contained in:
Araq 2017-12-29 20:01:49 +01:00
commit cf259fbd1c
2 changed files with 4 additions and 3 deletions

View file

@ -719,6 +719,7 @@ proc gcase(g: var TSrcGen, n: PNode) =
var c: TContext
initContext(c)
var length = sonsLen(n)
if length == 0: return
var last = if n.sons[length-1].kind == nkElse: -2 else: -1
if longMode(g, n, 0, last): incl(c.flags, rfLongMode)
putWithSpace(g, tkCase, "case")