File tree Expand file tree Collapse file tree 3 files changed +6
-2
lines changed
Expand file tree Collapse file tree 3 files changed +6
-2
lines changed Original file line number Diff line number Diff line change @@ -36,6 +36,7 @@ module Version = {
3636 | V1
3737 | V2
3838 | V3
39+ | V4
3940 | UnknownVersion (string )
4041
4142 // Helps finding the right API version
@@ -57,6 +58,7 @@ module Version = {
5758 }
5859 | list {"2" } => V2
5960 | list {"3" } => V3
61+ | list {"4" } => V4
6062 | _ => UnknownVersion (apiVersion )
6163 }
6264
@@ -65,6 +67,7 @@ module Version = {
6567 | V1 => "1.0"
6668 | V2 => "2.0"
6769 | V3 => "3.0"
70+ | V4 => "4.0"
6871 | UnknownVersion (version ) => version
6972 }
7073
@@ -73,7 +76,7 @@ module Version = {
7376 let availableLanguages = t =>
7477 switch t {
7578 | V1 => [Lang .Reason , Res ]
76- | V2 | V3 => [Lang .Res ]
79+ | V2 | V3 | V4 => [Lang .Res ]
7780 | UnknownVersion (_ ) => [Res ]
7881 }
7982}
Original file line number Diff line number Diff line change @@ -24,6 +24,7 @@ module Version: {
2424 | V1
2525 | V2
2626 | V3
27+ | V4
2728 | UnknownVersion (string )
2829
2930 // Helps finding the right API version
Original file line number Diff line number Diff line change @@ -490,7 +490,7 @@ let useCompilerManager = (
490490 | Lang .Reason => instance -> Compiler .reasonCompile (code )
491491 | Lang .Res => instance -> Compiler .resCompile (code )
492492 }
493- | V2 | V3 =>
493+ | V2 | V3 | V4 =>
494494 switch lang {
495495 | Lang .OCaml => instance -> Compiler .ocamlCompile (code )
496496 | Lang .Reason =>
You can’t perform that action at this time.
0 commit comments