@tellahq/rescript 10.1.4-republish-2 → 10.1.4-republish-3

package/lib/ocaml/js_bigint.ml

@@ -0,0 +1,3 @@
+(** JavaScript BigInt API *)
+
+type t

package/lib/ocaml/js_cast.ml

@@ -0,0 +1,29 @@
+(* Copyright (C) 2015-2016 Bloomberg Finance L.P.
+ * 
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Lesser General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * In addition to the permissions granted to you by the LGPL, you may combine
+ * or link a "work that uses the Library" with a publicly distributed version
+ * of this file to produce a combined library or application, then distribute
+ * that combined work under the terms of your choosing, with no requirement
+ * to comply with the obligations normally placed on you by section 4 of the
+ * LGPL version 3 (or the corresponding section of a later version of the LGPL
+ * should you choose to use a later version).
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU Lesser General Public License for more details.
+ * 
+ * You should have received a copy of the GNU Lesser General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *)
+
+(** *)
+
+external intOfBool : bool -> int = "%identity"  
+
+external floatOfInt : int -> float = "%identity"  

package/lib/ocaml/js_cast.mli

@@ -0,0 +1,45 @@
+(* Copyright (C) 2015-2016 Bloomberg Finance L.P.
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Lesser General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * In addition to the permissions granted to you by the LGPL, you may combine
+ * or link a "work that uses the Library" with a publicly distributed version
+ * of this file to produce a combined library or application, then distribute
+ * that combined work under the terms of your choosing, with no requirement
+ * to comply with the obligations normally placed on you by section 4 of the
+ * LGPL version 3 (or the corresponding section of a later version of the LGPL
+ * should you choose to use a later version).
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *)
+
+(**
+  Safe cast between OCaml values which share the same
+  runtime representation
+
+  Different OCaml types might share the same represention in the
+  ReScript runtime; while this is a compiler internal knowledge,
+  applications might benefit from having a safe and zero cost
+  conversion between those types.
+
+  This modules acts as the **single place** for such conversion.
+
+  If for any reason, the runtime representation changes, those function
+  will be modified accordingly.
+*)
+
+external intOfBool : bool -> int = "%identity"
+(** `intOfBool b` returns `1` for when `b` is `true` and `0` when `b` is
+    `false` *)
+
+external floatOfInt : int -> float = "%identity"
+(** `floatOfInt i` returns the float value of `i` *)

package/lib/ocaml/js_console.ml

@@ -0,0 +1,51 @@
+external log : 'a -> unit = "log" 
+[@@bs.val] [@@bs.scope "console"]
+external log2 : 'a -> 'b -> unit = "log" 
+[@@bs.val] [@@bs.scope "console"]
+external log3 : 'a -> 'b -> 'c -> unit = "log" 
+[@@bs.val] [@@bs.scope "console"]
+external log4 : 'a -> 'b -> 'c -> 'd -> unit = "log" 
+[@@bs.val] [@@bs.scope "console"]
+external logMany : 'a array -> unit = "log"
+[@@bs.val] [@@bs.scope "console"] [@@bs.splice]
+
+external info : 'a -> unit = "info" 
+[@@bs.val] [@@bs.scope "console"]
+external info2 : 'a -> 'b -> unit = "info" 
+[@@bs.val] [@@bs.scope "console"]
+external info3 : 'a -> 'b -> 'c -> unit = "info" 
+[@@bs.val] [@@bs.scope "console"]
+external info4 : 'a -> 'b -> 'c -> 'd -> unit = "info" 
+[@@bs.val] [@@bs.scope "console"]
+external infoMany : 'a array -> unit = "info"
+[@@bs.val] [@@bs.scope "console"] [@@bs.splice]
+
+external warn : 'a -> unit = "warn" 
+[@@bs.val] [@@bs.scope "console"]
+external warn2 : 'a -> 'b -> unit = "warn" 
+[@@bs.val] [@@bs.scope "console"]
+external warn3 : 'a -> 'b -> 'c -> unit = "warn" 
+[@@bs.val] [@@bs.scope "console"]
+external warn4 : 'a -> 'b -> 'c -> 'd -> unit = "warn" 
+[@@bs.val] [@@bs.scope "console"]
+external warnMany : 'a array -> unit = "warn"
+[@@bs.val] [@@bs.scope "console"] [@@bs.splice]
+
+external error : 'a -> unit = "error" 
+[@@bs.val] [@@bs.scope "console"]
+external error2 : 'a -> 'b -> unit = "error" 
+[@@bs.val] [@@bs.scope "console"]
+external error3 : 'a -> 'b -> 'c -> unit = "error" 
+[@@bs.val] [@@bs.scope "console"]
+external error4 : 'a -> 'b -> 'c -> 'd -> unit = "error" 
+[@@bs.val] [@@bs.scope "console"]
+external errorMany : 'a array -> unit = "error"
+[@@bs.val] [@@bs.scope "console"] [@@bs.splice]
+
+external trace : unit -> unit = "trace" [@@bs.val] [@@bs.scope "console"]
+
+external timeStart : string -> unit = 
+  "time" [@@bs.val] [@@bs.scope "console"]
+
+external timeEnd : string -> unit = "timeEnd" 
+  [@@bs.val] [@@bs.scope "console"]