@tellahq/rescript 10.1.0-alpha.1 → 10.1.0-alpha.2

package/lib/4.06.1/whole_compiler.ml

@@ -178463,6 +178463,8 @@ val jsx_module: jsx_module ref
 
 val jsx_mode: jsx_mode ref
 
+val refmt : string option ref
+
 val js_stdout : bool ref
 
 val all_module_aliases : bool ref
@@ -178551,6 +178553,7 @@ let force_cmj = ref false
 let jsx_version = ref None
 let jsx_module = ref React
 let jsx_mode = ref Classic
+let refmt = ref None
 let js_stdout = ref true
 let all_module_aliases = ref false
 let no_stdlib = ref false
@@ -178587,6 +178590,7 @@ let customize_runtime : string option ref = ref None
 let as_pp = ref false
 let self_stack : string Stack.t = Stack.create ()
 let modules = ref false
+
 end
 module Ast_config : sig 
 #1 "ast_config.mli"
@@ -178996,7 +179000,9 @@ let pp (sourcefile : string) =
   let tmpfile = Filename.temp_file "bspp" "" in
   let pp =
     (*TODO: check to avoid double quoting *)
-    Filename.concat (Filename.dirname Sys.executable_name) "refmt.exe"
+    match !Js_config.refmt with
+    | None -> Filename.concat (Filename.dirname Sys.executable_name) "refmt.exe"
+    | Some x -> x
   in
   let comm =
     if Sys.win32 then cmd_windows_quote pp sourcefile tmpfile
@@ -306205,6 +306211,9 @@ let buckle_script_flags : (string * Bsc_args.spec * string) array =
     "-bs-ml-out", unit_call (fun _ -> Config.syntax_kind := `ml),
     "*internal* Print compiler output in ML syntax";
 
+    "-bs-refmt", string_optional_set Js_config.refmt,
+    "*internal* set customized refmt path";
+
     "-bs-D",  string_call define_variable,
     "Define conditional variable e.g, -D DEBUG=true";
 

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@tellahq/rescript",
-  "version": "10.1.0-alpha.1",
+  "version": "10.1.0-alpha.2",
   "devDependencies": {
     "mocha": "^7.2.0",
     "nyc": "^15.0.0",