Merge pull request #358 from bjh21/bjh21-extra-tests

[jackhill/mal.git] / vhdl / stepA_mal.vhdl

diff --git a/vhdl/stepA_mal.vhdl b/vhdl/stepA_mal.vhdl
index d67507b..8ef8ecb 100644 (file)
--- a/vhdl/stepA_mal.vhdl
+++ b/vhdl/stepA_mal.vhdl
@@ -322,7 +322,8 @@ architecture test of stepA_mal is
               new_env(catch_env, env, vars, call_args);
               EVAL(ast.seq_val(2).seq_val(2), catch_env, result, err);
             else
-              new_nil(result);
+              err := sub_err;
+              return;
             end if;
           end if;
           return;