File tree Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Original file line number Diff line number Diff line change @@ -411,14 +411,14 @@ let translate output_prefix loc (cxt : Lam_compile_context.t)
411
411
match args with
412
412
| [ { expression_desc = Number (BigInt _) } as a; { expression_desc = Number (BigInt _) } as b ]
413
413
when Js_analyzer. is_okay_to_duplicate a && Js_analyzer. is_okay_to_duplicate b ->
414
- E. econd (E. js_comp Clt a b) a b
414
+ E. econd (E. bigint_comp Clt a b) a b
415
415
| [ a; b ] -> E. runtime_call Primitive_modules. bigint " min" args
416
416
| _ -> assert false )
417
417
| Pbigintmax -> (
418
418
match args with
419
419
| [ { expression_desc = Number (BigInt _) } as a; { expression_desc = Number (BigInt _) } as b ]
420
420
when Js_analyzer. is_okay_to_duplicate a && Js_analyzer. is_okay_to_duplicate b ->
421
- E. econd (E. js_comp Cgt a b) a b
421
+ E. econd (E. bigint_comp Cgt a b) a b
422
422
| [ a; b ] -> E. runtime_call Primitive_modules. bigint " max" args
423
423
| _ -> assert false )
424
424
| Pstringorder -> (
You can’t perform that action at this time.
0 commit comments