bugfix: preliminary symbol declaration in first pass of generics

This commit is contained in:
Araq 2011-12-30 21:00:38 +01:00
commit e9d6f5a647
3 changed files with 17 additions and 10 deletions

View file

@ -549,12 +549,14 @@ proc handleError(msg: TMsgKind, eh: TErrorHandling) =
assert(false) # we want a stack trace here
if (msg >= fatalMin) and (msg <= fatalMax):
if gVerbosity >= 3: assert(false)
assert false
quit(1)
if (msg >= errMin) and (msg <= errMax):
inc(gErrorCounter)
options.gExitcode = 1'i8
if gErrorCounter >= gErrorMax or eh == doAbort:
if gVerbosity >= 3: assert(false)
assert false
quit(1) # one error stops the compiler
elif eh == doRaise:
raiseRecoverableError()