aboutsummaryrefslogtreecommitdiffstats
path: root/cparser
diff options
context:
space:
mode:
Diffstat (limited to 'cparser')
-rw-r--r--cparser/Machine.ml5
-rw-r--r--cparser/Machine.mli1
2 files changed, 6 insertions, 0 deletions
diff --git a/cparser/Machine.ml b/cparser/Machine.ml
index 4999f0ac..193d83c4 100644
--- a/cparser/Machine.ml
+++ b/cparser/Machine.ml
@@ -272,6 +272,11 @@ let mppa_k1c =
struct_passing_style = SP_value32_ref_callee;
struct_return_style = SR_int1to4 }
+let aarch64 =
+ { i32lpll64 with name = "aarch64";
+ struct_passing_style = SP_ref_callee; (* Wrong *)
+ struct_return_style = SR_ref } (* Wrong *)
+
(* Add GCC extensions re: sizeof and alignof *)
let gcc_extensions c =
diff --git a/cparser/Machine.mli b/cparser/Machine.mli
index 24d36e6c..ea25c4f6 100644
--- a/cparser/Machine.mli
+++ b/cparser/Machine.mli
@@ -88,6 +88,7 @@ val arm_bigendian : t
val rv32 : t
val rv64 : t
val mppa_k1c : t
+val aarch64 : t
val gcc_extensions : t -> t
val compcert_interpreter : t -> t