diff options
Diffstat (limited to 'driver')
-rw-r--r-- | driver/Configuration.ml | 2 | ||||
-rw-r--r-- | driver/Frontend.ml | 1 |
2 files changed, 2 insertions, 1 deletions
diff --git a/driver/Configuration.ml b/driver/Configuration.ml index 972fd295..eae3aaab 100644 --- a/driver/Configuration.ml +++ b/driver/Configuration.ml @@ -123,7 +123,7 @@ let get_bool_config key = let arch = match get_config_string "arch" with - | "powerpc"|"arm"|"x86"|"riscV" as a -> a + | "powerpc"|"arm"|"x86"|"riscV"|"mppa_k1c" as a -> a | v -> bad_config "arch" [v] let model = get_config_string "model" let abi = get_config_string "abi" diff --git a/driver/Frontend.ml b/driver/Frontend.ml index 209e72e9..db84a9f9 100644 --- a/driver/Frontend.ml +++ b/driver/Frontend.ml @@ -83,6 +83,7 @@ let init () = | "riscV" -> if Configuration.model = "64" then Machine.rv64 else Machine.rv32 + | "mppa_k1c" -> Machine.mppa_k1c | _ -> assert false end; Builtins.set C2C.builtins; |