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 0417a02db6f05d69306565bdb78bdc6950a41d51..809858dbd944a44b59045e550cc123bed517cfd1 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
@@ -1190,6 +1190,7 @@ SEXP SET_TYPEOF_FASTR(SEXP x, int v) {
 void SET_NAMED(SEXP x, int v) {
     TRACE(TARGpd, x, v);
     ((call_SET_NAMED) callbacks[SET_NAMED_FASTR_x])(x, v);
+    checkExitCall();
 }
 
 void SET_ATTRIB(SEXP x, SEXP v) {
diff --git a/com.oracle.truffle.r.native/version.source b/com.oracle.truffle.r.native/version.source
index a2720097dccb441015beb4f75766b9908ad46f5a..425151f3a411f5e088d7753e7c8d016303b1b9d1 100644
--- a/com.oracle.truffle.r.native/version.source
+++ b/com.oracle.truffle.r.native/version.source
@@ -1 +1 @@
-39
+40