Skip to content

Commit facc5f8

Browse files
committed
Make minimal-mode slightly less aggressive.
1 parent b184be0 commit facc5f8

File tree

1 file changed

+3
-7
lines changed

1 file changed

+3
-7
lines changed

src/boot/be/x86.ml

Lines changed: 3 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -1236,7 +1236,7 @@ let fn_prologue
12361236
(nabi:nabi)
12371237
(grow_task_fixup:fixup)
12381238
(is_obj_fn:bool)
1239-
(minimal:bool)
1239+
(_(*minimal*):bool)
12401240
: unit =
12411241

12421242
let esi_n = word_n (h esi) in
@@ -1373,12 +1373,8 @@ let fn_prologue
13731373
in
13741374

13751375
(* "Full" frame size-check. *)
1376-
match dynamic_grow_jmp with
1377-
None when minimal -> ()
1378-
| _ ->
1379-
stack_growth_check e nabi grow_task_fixup
1380-
dynamic_frame_sz dynamic_grow_jmp restart_pc (h esi) (h edi);
1381-
1376+
stack_growth_check e nabi grow_task_fixup
1377+
dynamic_frame_sz dynamic_grow_jmp restart_pc (h esi) (h edi);
13821378

13831379
(* Establish a frame, wherever we landed. *)
13841380
sub (rc esp) dynamic_frame_sz;

0 commit comments

Comments
 (0)