bugfix: optimization of complex constant string concatenations

This commit is contained in:
Araq 2012-02-17 02:16:33 +01:00
commit 97366d4419
7 changed files with 43 additions and 16 deletions

View file

@ -512,6 +512,10 @@ proc toFileLine*(info: TLineInfo): string {.inline.} =
proc toFileLineCol*(info: TLineInfo): string {.inline.} =
result = info.toFilename & "(" & $info.line & "," & $info.col & ")"
proc `??`* (info: TLineInfo, filename: string): bool =
# only for debugging purposes
result = filename in info.toFilename
var checkPoints: seq[TLineInfo] = @[]
proc addCheckpoint*(info: TLineInfo) =