diff --git a/com.oracle.truffle.r.native/fficall/src/truffle_common/Rinternals_truffle_common.h b/com.oracle.truffle.r.native/fficall/src/truffle_common/Rinternals_truffle_common.h index 7cd01653107b217d3acc4cef2fdd5d7d27685406..aaf82384b184450d1e136097cbfa4b44f8dd95e1 100644 --- a/com.oracle.truffle.r.native/fficall/src/truffle_common/Rinternals_truffle_common.h +++ b/com.oracle.truffle.r.native/fficall/src/truffle_common/Rinternals_truffle_common.h @@ -1378,6 +1378,9 @@ SEXP Rf_asS4(SEXP x, Rboolean b, int i) { static SEXP R_tryEvalInternal(SEXP x, SEXP y, int *ErrorOccurred, int silent) { TRACE0(); + if (ErrorOccurred) { + *ErrorOccurred = 0; + } return ((call_R_tryEval) callbacks[R_tryEval_x])(x, y, ErrorOccurred, silent); }