remove once-used local variable

Rdatatable · Sep 27, 2024 · 6fb4e26 · 6fb4e26
1 parent e4e5b8a
commit 6fb4e26
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/src/programming.c b/src/programming.c
@@ -1,8 +1,7 @@
 #include "data.table.h"
 
 static void substitute_call_arg_names(SEXP expr, SEXP env) {
-  R_len_t len = length(expr);
-  if (!len || !isLanguage(expr))
+  if (!length(expr) || !isLanguage(expr))
     return; // isLanguage is R's is.call
   SEXP arg_names = getAttrib(expr, R_NamesSymbol);
   if (!isNull(arg_names)) {