diff --git a/src/CCubes.c b/src/CCubes.c
index eb07e46..96e86b5 100755
--- a/src/CCubes.c
+++ b/src/CCubes.c
@@ -39,7 +39,6 @@ SEXP CCubes(SEXP tt) {
     SET_STRING_ELT(names, 1, mkChar("package"));
     Rf_setAttrib(args, R_NamesSymbol, names);
 
-    SEXP r_call = PROTECT();
     SEXP r_result = PROTECT(R_tryEval(
         Rf_lang3(install("do.call"), mkString("system.file"), args),
         R_GlobalEnv,