diff --git a/com.oracle.truffle.r.native/fficall/src/jni/Rinternals.c b/com.oracle.truffle.r.native/fficall/src/jni/Rinternals.c
index d8a81d9a96e028742e424ebc8da5a07bd557c070..65c94ff94dda4d1d518a81bbe8c283ff33587e7b 100644
--- a/com.oracle.truffle.r.native/fficall/src/jni/Rinternals.c
+++ b/com.oracle.truffle.r.native/fficall/src/jni/Rinternals.c
@@ -664,21 +664,24 @@ SEXP Rf_classgets(SEXP x, SEXP y) {
 }
 
 const char *Rf_translateChar(SEXP x) {
-//	unimplemented("Rf_translateChar");
 	// TODO: proper implementation
+	TRACE(TARGp, x);
 	const char *result = CHAR(x);
-//	printf("translateChar: '%s'\n", result);
 	return result;
 }
 
 const char *Rf_translateChar0(SEXP x) {
-	unimplemented("Rf_translateChar0");
-	return NULL;
+	// TODO: proper implementation
+	TRACE(TARGp, x);
+	const char *result = CHAR(x);
+	return result;
 }
 
 const char *Rf_translateCharUTF8(SEXP x) {
-	unimplemented("Rf_translateCharUTF8");
-	return NULL;
+	// TODO: proper implementation
+	TRACE(TARGp, x);
+	const char *result = CHAR(x);
+	return result;
 }
 
 SEXP Rf_lengthgets(SEXP x, R_len_t y) {