@rescript/std
Version:
The motiviation of this repo is that when ReScript users want to share their library with JS users, the JS users don't need have ReScript toolchain installed, this makes sharing code with JS users easier (more details on that topic can be found in our [Ex
71 lines (54 loc) • 1.18 kB
JavaScript
import * as Caml from "./caml.js";
import * as Caml_int64 from "./caml_int64.js";
import * as Caml_format from "./caml_format.js";
import * as Caml_js_exceptions from "./caml_js_exceptions.js";
function pred(n) {
return Caml_int64.sub(n, Caml_int64.one);
}
function abs(n) {
if (Caml.i64_ge(n, Caml_int64.zero)) {
return n;
} else {
return Caml_int64.neg(n);
}
}
function lognot(n) {
return Caml_int64.xor(n, Caml_int64.neg_one);
}
function of_string_opt(s) {
try {
return Caml_format.int64_of_string(s);
}
catch (raw_exn){
var exn = Caml_js_exceptions.internalToOCamlException(raw_exn);
if (exn.RE_EXN_ID === "Failure") {
return ;
}
throw exn;
}
}
var compare = Caml_int64.compare;
var equal = Caml_int64.equal;
var zero = Caml_int64.zero;
var one = Caml_int64.one;
var minus_one = Caml_int64.neg_one;
var succ = Caml_int64.succ;
var max_int = Caml_int64.max_int;
var min_int = Caml_int64.min_int;
var to_string = Caml_int64.to_string;
export {
zero ,
one ,
minus_one ,
succ ,
pred ,
abs ,
max_int ,
min_int ,
lognot ,
of_string_opt ,
to_string ,
compare ,
equal ,
}
/* No side effect */