Remove temporary -curried option.

Author: cristianoc

jscomp/bsc/rescript_compiler_main.ml

@@ -34,8 +34,6 @@ let setup_runtime_path path =
      Bs_version.package_name := std);
   Js_config.customize_runtime := Some path
 
-let curry_specified = ref false
-
 
 let process_file sourcefile ?(kind ) ppf = 
   (* This is a better default then "", it will be changed later 
@@ -48,11 +46,6 @@ let process_file sourcefile ?(kind ) ppf =
     match kind with 
     | None -> Ext_file_extensions.classify_input (Ext_filename.get_extension_maybe sourcefile)  
     | Some kind -> kind in 
-  (if !curry_specified = false && !Clflags.dump_source = false && !Js_config.syntax_only = false && List.mem kind [Res; Resi] then
-    let _ = Printf.eprintf "XXX curry not specified %s\n%!" sourcefile in
-    let _ = assert false in
-    ()
-  );
   let res = match kind with 
   | Res -> 
     let sourcefile = set_abs_input_name  sourcefile in     
@@ -413,10 +406,8 @@ let buckle_script_flags : (string * Bsc_args.spec * string) array =
 
     "-nopervasives", set Clflags.nopervasives, 
     "*internal*";
-    "-uncurried", unit_call (fun () -> curry_specified := true; Config.uncurried := Uncurried),
-    "*internal*";
-    "-curried", unit_call (fun () -> curry_specified := true; Config.uncurried := Legacy),
-    "*internal*";
+    "-uncurried", unit_call (fun () -> Config.uncurried := Uncurried),
+    "*internal* Set jsx module";
     "-v", unit_call print_version_string,
     "Print compiler version and location of standard library and exit";