diff --git a/src/library/vm/vm_environment.cpp b/src/library/vm/vm_environment.cpp index 463c14b7c3..5e18e684c6 100644 --- a/src/library/vm/vm_environment.cpp +++ b/src/library/vm/vm_environment.cpp @@ -218,9 +218,9 @@ vm_obj environment_is_namespace(vm_obj const & env, vm_obj const & n) { } vm_obj environment_structure_fields(vm_obj const & env, vm_obj const & n) { - try { + if (is_structure(to_env(env), to_name(n))) { return mk_vm_some(to_obj(get_structure_fields(to_env(env), to_name(n)))); - } catch (exception &) { + } else { return mk_vm_none(); } }