diff options
author | Cyril SIX <cyril.six@kalray.eu> | 2018-02-21 17:45:44 +0100 |
---|---|---|
committer | Cyril SIX <cyril.six@kalray.eu> | 2018-04-04 16:30:06 +0200 |
commit | 6a3f3a62452670380827f9e39dd28c5092741099 (patch) | |
tree | 98f3ac276cec9c64d0b8ee030e65a41713295b34 /driver | |
parent | adbefdc338c921f1b05dcf4996d32a3ca8b5f486 (diff) | |
download | compcert-kvx-6a3f3a62452670380827f9e39dd28c5092741099.tar.gz compcert-kvx-6a3f3a62452670380827f9e39dd28c5092741099.zip |
Hook for MPPA_K1c (generates Risc-V code for now)
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; |