Procházet zdrojové kódy

uncomment Invalid_expr catching since a trace to the interp call is better than ocaml traceback

Dan Korostelev před 9 roky
rodič
revize
83ecef1ef6
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  1. 1 1
      interp.ml

+ 1 - 1
interp.ml

@@ -3495,7 +3495,7 @@ and call ctx vthis vfun pl p =
 		| Stack_overflow -> exc (VString "Compiler Stack overflow")
 		| Sys_error msg | Failure msg -> exc (VString msg)
 		| Unix.Unix_error (_,cmd,msg) -> exc (VString ("Error " ^ cmd ^ " " ^ msg))
-		(* | Invalid_expr -> exc (VString "Invalid input value") *)
+		| Invalid_expr -> exc (VString "Invalid input value")
 		| Builtin_error | Invalid_argument _ -> exc (VString "Invalid call")) in
 	ctx.vthis <- oldthis;
 	ctx.venv <- oldenv;