@@ -517,6 +517,7 @@ and expr dce e =
expr dce e;
| TThrow e ->
check_and_add_feature dce "has_throw";
+ expr dce e;
(*
TODO: Simon, save me! \o
This is a hack needed to keep toString field of the actual exception objects
@@ -526,8 +527,7 @@ and expr dce e =
| TNew({cl_path=(["js";"_Boot"],"HaxeError")}, _, [eoriginal]) -> eoriginal
| _ -> e
) in
- to_string dce e.etype;
- expr dce e
+ to_string dce e.etype
| _ ->
Type.iter (expr dce) e