File tree Expand file tree Collapse file tree 2 files changed +2
-2
lines changed Expand file tree Collapse file tree 2 files changed +2
-2
lines changed Original file line number Diff line number Diff line change @@ -1608,7 +1608,7 @@ let unchecked_int32_mul ?comment e1 e2 : J.expression =
16081608let int32_pow ?comment (e1 : t ) (e2 : t ) : J.expression =
16091609 match (e1.expression_desc, e2.expression_desc) with
16101610 | Number (Int {i = i1 } ), Number (Int {i = i2 } ) ->
1611- int ?comment (Ext_int. int32_pow i1 i2)
1611+ to_int32 ( int ?comment (Ext_int. int32_pow i1 i2) )
16121612 | _ -> {comment; expression_desc = Bin (Pow , e1, e2)}
16131613
16141614let rec int32_bxor ?comment (e1 : t ) (e2 : t ) : J.expression =
Original file line number Diff line number Diff line change @@ -106,7 +106,7 @@ type int_op =
106106 (* x / y | 0 *)
107107 | Mod
108108 (* x % y *)
109- | Pow
109+ | Pow (* x ** y | 0 *)
110110
111111(* https://developer.mozilla.org/en-US/docs/Web/JavaScript/Guide/Expressions_and_Operators#Bitwise_operators
112112 {[
You can’t perform that action at this time.
0 commit comments