|
@@ -1991,7 +1991,7 @@ and eval ctx (e,p) =
|
|
|
| _ ->
|
|
|
VNull
|
|
|
in
|
|
|
- (fun() -> try loop (DynArray.length ctx.stack) with Sys.Break -> throw ctx p "Ctrl+C")
|
|
|
+ (fun() -> try loop (DynArray.length ctx.stack) with Sys.Break when (try Sys.getenv "HAXEDEBUG" <> "1" with _ -> true) -> throw ctx p "Ctrl+C")
|
|
|
| EWhile (econd,e,DoWhile) ->
|
|
|
let e = eval ctx e in
|
|
|
let econd = eval ctx econd in
|