File tree Expand file tree Collapse file tree 3 files changed +3
-3
lines changed Expand file tree Collapse file tree 3 files changed +3
-3
lines changed Original file line number Diff line number Diff line change 26
26
*)
27
27
28
28
let random_seed: unit -> int array = fun _ ->
29
- let seed :int = [% raw " Math.floor(Math.random()*0x7fff_ffff )" ] in
29
+ let seed :int = [% raw " Math.floor(Math.random()*0x7fffffff )" ] in
30
30
[|seed|]
31
31
32
32
module State = struct
Original file line number Diff line number Diff line change @@ -9,7 +9,7 @@ import * as Caml_int64 from "./caml_int64.js";
9
9
import * as Caml_string from "./caml_string.js" ;
10
10
11
11
function random_seed ( param ) {
12
- return [ ( Math . floor ( Math . random ( ) * 0x7fff_ffff ) ) ] ;
12
+ return [ ( Math . floor ( Math . random ( ) * 0x7fffffff ) ) ] ;
13
13
}
14
14
15
15
function assign ( st1 , st2 ) {
Original file line number Diff line number Diff line change @@ -9,7 +9,7 @@ var Caml_int64 = require("./caml_int64.js");
9
9
var Caml_string = require ( "./caml_string.js" ) ;
10
10
11
11
function random_seed ( param ) {
12
- return [ ( Math . floor ( Math . random ( ) * 0x7fff_ffff ) ) ] ;
12
+ return [ ( Math . floor ( Math . random ( ) * 0x7fffffff ) ) ] ;
13
13
}
14
14
15
15
function assign ( st1 , st2 ) {
You can’t perform that action at this time.
0 commit comments