add more on std/fmt

Author: cometkim

src/RescriptDeno_Std_Fmt.res

@@ -1 +1,3 @@
+module Bytes = RescriptDeno_Std_Fmt_Bytes
 module Color = RescriptDeno_Std_Fmt_Color
+module Printf = RescriptDeno_Std_Fmt_Printf

src/RescriptDeno_Std_Fmt_Bytes.res

@@ -0,0 +1,37 @@
+type prettyBytesOptions
+
+%%private(
+  @obj
+  external makePrettyBytesOptions: (
+    ~bits: option<bool>=?,
+    ~binary: option<bool>=?,
+    ~signed: option<bool>=?,
+    ~locale: option<array<string>>=?,
+    ~minimumFractionDigits: option<int>=?,
+    ~maximumFractionDigits: option<int>=?,
+    unit,
+  ) => prettyBytesOptions = ""
+
+  @module("https://deno.land/std/fmt/bytes.ts")
+  external _prettyBytes: (int, prettyBytesOptions) => string = "prettyBytes"
+)
+
+let prettyBytes = (
+  num,
+  ~bits=?,
+  ~binary=?,
+  ~signed=?,
+  ~locale=?,
+  ~minimumFractionDigits=?,
+  ~maximumFractionDigits=?,
+  (),
+) =>
+  makePrettyBytesOptions(
+    ~bits,
+    ~binary,
+    ~signed,
+    ~locale,
+    ~minimumFractionDigits,
+    ~maximumFractionDigits,
+    (),
+  )->_prettyBytes(num, _)

src/RescriptDeno_Std_Fmt_Printf.res

@@ -0,0 +1,8 @@
+@unboxed
+type rec arg = Unknown('a): arg
+
+@module("https://deno.land/std/fmt/printf.ts") @variadic
+external sprintf: (string, array<arg>) => string = "sprintf"
+
+@module("https://deno.land/std/fmt/printf.ts") @variadic
+external printf: (string, array<arg>) => unit = "printf"