tclArgError
Signed-off-by: James Cherry <cherry@parallaxsw.com>
This commit is contained in:
parent
5a26929be5
commit
cabc1424e0
|
|
@ -101,7 +101,7 @@ tclArgError(Tcl_Interp *interp,
|
||||||
try {
|
try {
|
||||||
Sta::sta()->report()->error(id, msg, arg);
|
Sta::sta()->report()->error(id, msg, arg);
|
||||||
} catch (const std::exception &e) {
|
} catch (const std::exception &e) {
|
||||||
Tcl_SetResult(interp, const_cast<char*>(e.what()), TCL_STATIC);
|
Tcl_SetResult(interp, const_cast<char*>(e.what()), TCL_VOLATILE);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue