diff options
Diffstat (limited to 'cparser')
-rw-r--r-- | cparser/Machine.ml | 5 | ||||
-rw-r--r-- | cparser/Machine.mli | 1 |
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 |