bugfix: reprEnum

This commit is contained in:
Araq 2012-02-02 02:40:21 +01:00
commit 3af91064e5
2 changed files with 3 additions and 2 deletions

View file

@ -50,6 +50,8 @@ proc reprChar(x: char): string {.compilerRtl.} =
add result, "\'"
proc reprEnum(e: int, typ: PNimType): string {.compilerRtl.} =
# we read an 'int' but this may have been too large, so mask the other bits:
let e = e and (1 shl (typ.size*8)-1)
if ntfEnumHole notin typ.flags:
if e <% typ.node.len:
return $typ.node.sons[e].name