Expose "inner" name spec global

Author: DavisVaughan

src/names.c

@@ -1021,6 +1021,7 @@ r_obj* vctrs_validate_minimal_names(r_obj* names, r_obj* n_) {
   return names;
 }
 
+r_obj* name_spec_inner = NULL;
 
 struct name_repair_opts unique_repair_default_opts;
 struct name_repair_opts unique_repair_silent_opts;
@@ -1041,6 +1042,9 @@ void vctrs_init_names(r_obj* ns) {
   fns_glue_as_name_spec = r_env_get(ns, syms_glue_as_name_spec);
   syms_internal_spec = r_sym("_spec");
 
+  name_spec_inner = r_chr("inner");
+  r_preserve(name_spec_inner);
+
   unique_repair_default_opts.type = NAME_REPAIR_unique;
   unique_repair_default_opts.fn = r_null;
   unique_repair_default_opts.quiet = false;

src/names.h

@@ -42,6 +42,8 @@ struct name_repair_opts new_name_repair_opts(r_obj* name_repair,
 r_obj* vec_as_universal_names(r_obj* names, bool quiet);
 r_obj* vec_as_custom_names(r_obj* names, const struct name_repair_opts* opts);
 
+extern r_obj* name_spec_inner;
+
 extern struct name_repair_opts unique_repair_default_opts;
 extern struct name_repair_opts unique_repair_silent_opts;
 extern struct name_repair_opts no_repair_opts;