Get rid of more deprecation warnings by renaming exceptions

This commit is contained in:
def
2015-01-27 11:58:15 +01:00
parent a89ad11c3c
commit 7894f50a56
2 changed files with 4 additions and 4 deletions

View File

@@ -11,7 +11,7 @@
proc raiseRangeError(val: BiggestInt) {.compilerproc, noreturn, noinline.} =
when hostOS == "standalone":
sysFatal(EOutOfRange, "value out of range")
sysFatal(RangeError, "value out of range")
else:
sysFatal(RangeError, "value out of range: ", $val)
@@ -44,7 +44,7 @@ proc chckRangeF(x, a, b: float): float =
return x
else:
when hostOS == "standalone":
sysFatal(EOutOfRange, "value out of range")
sysFatal(RangeError, "value out of range")
else:
sysFatal(RangeError, "value out of range: ", $x)

View File

@@ -33,10 +33,10 @@ proc quitOrDebug() {.inline.} =
quit(1)
proc raiseException(e: ref Exception, ename: cstring) {.compilerRtl.} =
sysFatal(ENoExceptionToReraise, "exception handling is not available")
sysFatal(ReraiseError, "exception handling is not available")
proc reraiseException() {.compilerRtl.} =
sysFatal(ENoExceptionToReraise, "no exception to reraise")
sysFatal(ReraiseError, "no exception to reraise")
proc writeStackTrace() = discard