File tree 2 files changed +2
-2
lines changed
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 =
1608
1608
let int32_pow ?comment (e1 : t ) (e2 : t ) : J.expression =
1609
1609
match (e1.expression_desc, e2.expression_desc) with
1610
1610
| 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) )
1612
1612
| _ -> {comment; expression_desc = Bin (Pow , e1, e2)}
1613
1613
1614
1614
let 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 =
106
106
(* x / y | 0 *)
107
107
| Mod
108
108
(* x % y *)
109
- | Pow
109
+ | Pow (* x ** y | 0 *)
110
110
111
111
(* https://developer.mozilla.org/en-US/docs/Web/JavaScript/Guide/Expressions_and_Operators#Bitwise_operators
112
112
{[
You can’t perform that action at this time.
0 commit comments