aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--powerpc/Machregs.v4
1 files changed, 3 insertions, 1 deletions
diff --git a/powerpc/Machregs.v b/powerpc/Machregs.v
index 7137bce2..4ee6493c 100644
--- a/powerpc/Machregs.v
+++ b/powerpc/Machregs.v
@@ -163,7 +163,7 @@ Fixpoint destroyed_by_clobber (cl: list string): list mreg :=
Definition destroyed_by_builtin (ef: external_function): list mreg :=
match ef with
| EF_builtin id sg =>
- if string_dec id "__builtin64_set_spr" then R10::nil
+ if string_dec id "__builtin_set_spr64" then R10::nil
else if string_dec id "__builtin_atomic_exchange" then R10::nil
else if string_dec id "__builtin_atomic_compare_exchange" then R10::R11::nil
else F13 :: nil
@@ -221,7 +221,9 @@ Definition builtin_constraints (ef: external_function) :
match ef with
| EF_builtin id sg =>
if string_dec id "__builtin_get_spr" then OK_const :: nil
+ else if string_dec id "__builtin_get_spr64" then OK_const :: nil
else if string_dec id "__builtin_set_spr" then OK_const :: OK_default :: nil
+ else if string_dec id "__builtin_set_spr64" then OK_const :: OK_default :: nil
else if string_dec id "__builtin_prefetch" then OK_default :: OK_const :: OK_const :: nil
else if string_dec id "__builtin_dcbtls" then OK_default :: OK_const :: nil
else if string_dec id "__builtin_icbtls" then OK_default :: OK_const :: nil