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 6cfe0a3c216e6495a0d9fdc8d8b5499409a86016..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
@@ -1188,8 +1188,9 @@ SEXP SET_TYPEOF_FASTR(SEXP x, int v) {
 }
 
 void SET_NAMED(SEXP x, int v) {
-    TRACE0();
-    unimplemented("SET_NAMED");
+    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