Improve error message for failed conversion in VM

- Fixes #2045

- Old one:
  Error: conversion from unknown type to unknown type is invalid
- New one:
  Error: conversion from -1 to [0..255] is invalid
This commit is contained in:
def
2015-03-12 23:48:38 +01:00
parent c707923cc1
commit 7daf410f46

View File

@@ -814,7 +814,7 @@ proc rawExecute(c: PCtx, start: int, tos: PStackFrame): TFullReg =
leValueConv(regs[ra].regToNode, regs[rc].regToNode)):
stackTrace(c, tos, pc, errGenerated,
msgKindToString(errIllegalConvFromXtoY) % [
"unknown type" , "unknown type"])
$regs[ra].regToNode, "[" & $regs[rb].regToNode & ".." & $regs[rc].regToNode & "]"])
of opcIndCall, opcIndCallAsgn:
# dest = call regStart, n; where regStart = fn, arg1, ...
let rb = instr.regB