Skip to content

Commit

Permalink
provide compatibility with zarith 1.12
Browse files Browse the repository at this point in the history
Signed-off-by: Arseniy Alekseyev <[email protected]>
  • Loading branch information
aalekseyev committed Oct 13, 2021
1 parent 8fd9bd1 commit 1a8b7de
Showing 1 changed file with 6 additions and 0 deletions.
6 changes: 6 additions & 0 deletions runtime.js
Original file line number Diff line number Diff line change
Expand Up @@ -11,6 +11,12 @@ function ml_z_normalize(x){
return x;
}

//Provides: ml_z_mul_overflows
function ml_z_mul_overflows(x,y){
var z = x*y;
return z != (z|0);
}

//external init: unit -> unit
//Provides: ml_z_init
//Requires: caml_zarith_marshal, caml_zarith_unmarshal, caml_custom_ops, ml_z_hash, ml_z_compare
Expand Down

0 comments on commit 1a8b7de

Please sign in to comment.