Simon Krajewski преди 12 години
родител
ревизия
d2c7109ce4
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      codegen.ml

+ 1 - 1
codegen.ml

@@ -1679,7 +1679,7 @@ let promote_complex_returns ctx e =
 			{e with eexpr = TIf(eif, loop t ethen, match eelse with None -> None | Some e -> Some (loop t e))}
 		| TTry(e1,el) ->
 			{e with eexpr = TTry(loop t e1, List.map (fun (el,e) -> el,loop t e) el)}
-		| TReturn _ ->
+		| TReturn _ | TThrow _ ->
 			e
 		| _ ->
 			mk (TReturn (Some e)) t e.epos