let as_symbol name = 
  Misc.just_try (fun () -> Misc.array_associ name builtin_env)