UNPKG

bs-platform

Version:

bucklescript compiler, ocaml standard libary by bucklescript and its required runtime support

54 lines (40 loc) 847 B
'use strict'; var Caml_format = require("./caml_format.js"); var Caml_primitive = require("./caml_primitive.js"); function succ(n) { return n + 1 | 0; } function pred(n) { return n - 1 | 0; } function abs(n) { if (n >= 0) { return n; } else { return -n | 0; } } function lognot(n) { return n ^ -1; } function to_string(n) { return Caml_format.caml_int32_format("%d", n); } var compare = Caml_primitive.caml_int32_compare; var zero = 0; var one = 1; var minus_one = -1; var max_int = 2147483647; var min_int = -2147483648; exports.zero = zero; exports.one = one; exports.minus_one = minus_one; exports.succ = succ; exports.pred = pred; exports.abs = abs; exports.max_int = max_int; exports.min_int = min_int; exports.lognot = lognot; exports.to_string = to_string; exports.compare = compare; /* No side effect */