Actually remove SET_TYPEOF

nlmixr2 · Jun 30, 2024 · 4eb3afa · 4eb3afa
1 parent facb366
commit 4eb3afa
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/src/getOption.c b/src/getOption.c
@@ -9,7 +9,6 @@ int R_get_option(const char *option, int def) {
   SEXP s, t;
   int ret, pro=0;
   PROTECT(t = s = LCONS(R_NilValue, allocList(2)));pro++;
-  SET_TYPEOF(s, LANGSXP);
   SETCAR(t, install("getOption")); t = CDR(t);
   SETCAR(t, mkString(option)); t = CDR(t);
   if (def){