1 #define R_NO_REMAP 2 #include <stdbool.h> 3 #include <R.h> 4 #include <Rinternals.h> 5 6 bool is_lazy_load(SEXP x); 7 bool is_call_to(SEXP x, const char* f); 8 bool is_formula(SEXP x); 9 SEXP rhs(SEXP f); 10 SEXP lhs(SEXP f); 11 SEXP env(SEXP f); 12 SEXP findLast(SEXP x); 13 SEXP make_formula1(SEXP rhs, SEXP env); 14