Avoid crash when switching from 9.x to 10.x.

Author: cristianoc

Diff for: src/bindings/RescriptCompilerApi.mjs

@@ -88,14 +88,6 @@ function fromString(apiVersion) {
   }
 }
 
-function defaultTargetLang(t) {
-  if (t === 0) {
-    return /* Res */2;
-  } else {
-    return /* Reason */0;
-  }
-}
-
 function availableLanguages(t) {
   if (t === 0) {
     return [
@@ -109,7 +101,7 @@ function availableLanguages(t) {
 
 var Version = {
   fromString: fromString,
-  defaultTargetLang: defaultTargetLang,
+  defaultTargetLang: /* Res */2,
   availableLanguages: availableLanguages
 };
 

Diff for: src/bindings/RescriptCompilerApi.res

@@ -58,11 +58,7 @@ module Version = {
     | _ => UnknownVersion(apiVersion)
     }
 
-  let defaultTargetLang = t =>
-    switch t {
-    | V1 => Lang.Res
-    | _ => Reason
-    }
+  let defaultTargetLang = Lang.Res
 
   let availableLanguages = t =>
     switch t {

Diff for: src/bindings/RescriptCompilerApi.resi

@@ -28,7 +28,7 @@ module Version: {
   // Helps finding the right API version
   let fromString: string => t
 
-  let defaultTargetLang: t => Lang.t
+  let defaultTargetLang: Lang.t
 
   let availableLanguages: t => array<Lang.t>
 }

Diff for: src/common/CompilerManagerHook.mjs

@@ -404,7 +404,7 @@ function useCompilerManager(initialLangOpt, onAction, param) {
                       };
                       var targetLang = Belt_Option.getWithDefault(Caml_option.undefined_to_opt(RescriptCompilerApi.Version.availableLanguages(apiVersion).find(function (l) {
                                     return l === initialLang;
-                                  })), RescriptCompilerApi.Version.defaultTargetLang(apiVersion));
+                                  })), RescriptCompilerApi.Version.defaultTargetLang);
                       return Curry._1(setState, (function (param) {
                                     return {
                                             TAG: 2,
@@ -468,7 +468,7 @@ function useCompilerManager(initialLangOpt, onAction, param) {
                                                 _0: {
                                                   versions: ready.versions,
                                                   selected: selected,
-                                                  targetLang: RescriptCompilerApi.Version.defaultTargetLang(apiVersion),
+                                                  targetLang: RescriptCompilerApi.Version.defaultTargetLang,
                                                   errors: [],
                                                   result: /* Nothing */0
                                                 },

Diff for: src/common/CompilerManagerHook.res

@@ -352,7 +352,7 @@ let useCompilerManager = (~initialLang: Lang.t=Res, ~onAction: option<action =>
             let targetLang =
               Version.availableLanguages(apiVersion)
               ->Js.Array2.find(l => l === initialLang)
-              ->Belt.Option.getWithDefault(Version.defaultTargetLang(apiVersion))
+              ->Belt.Option.getWithDefault(Version.defaultTargetLang)
 
             setState(_ => Ready({
               selected: selected,
@@ -400,7 +400,7 @@ let useCompilerManager = (~initialLang: Lang.t=Res, ~onAction: option<action =>
 
           setState(_ => Ready({
             selected: selected,
-            targetLang: Version.defaultTargetLang(apiVersion),
+            targetLang: Version.defaultTargetLang,
             versions: ready.versions,
             errors: [],
             result: FinalResult.Nothing,
@@ -428,7 +428,6 @@ let useCompilerManager = (~initialLang: Lang.t=Res, ~onAction: option<action =>
         | Lang.OCaml => instance->Compiler.ocamlCompile(code)
         | Lang.Reason =>
           CompilationResult.UnexpectedError(j`Reason not supported with API version "$apiVersion"`)
-
         | Lang.Res => instance->Compiler.resCompile(code)
         }
       | UnknownVersion(apiVersion) =>