diff options
| author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-03-20 17:01:25 +0100 |
|---|---|---|
| committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-03-20 17:01:25 +0100 |
| commit | ab5528fb4caf637a0c7014d943302198079e7c20 (patch) | |
| tree | 7d5d801f3386b1b54d385b14f24398e9351cf16c /mppa_k1c/Conventions1.v | |
| parent | cfed53ffe9ce572e3a4f54d30bcb97c2044bcb5b (diff) | |
| download | compcert-kvx-ab5528fb4caf637a0c7014d943302198079e7c20.tar.gz compcert-kvx-ab5528fb4caf637a0c7014d943302198079e7c20.zip | |
XLeroy's suggested fix for shared float/int register file.
Diffstat (limited to 'mppa_k1c/Conventions1.v')
| -rw-r--r-- | mppa_k1c/Conventions1.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/mppa_k1c/Conventions1.v b/mppa_k1c/Conventions1.v index 59159f61..d41f1095 100644 --- a/mppa_k1c/Conventions1.v +++ b/mppa_k1c/Conventions1.v @@ -47,13 +47,13 @@ Definition int_caller_save_regs := :: R52 :: R53 :: R54 :: R55 :: R56 :: R57 :: R58 :: R59 :: R60 :: R61 :: R62 :: R63 :: nil. -Definition float_caller_save_regs := rev int_caller_save_regs. +Definition float_caller_save_regs : list mreg := nil. Definition int_callee_save_regs := (* R15 :: R16 :: R17 :: *)R18 :: R19 :: R20 :: R21 :: R22 :: R23 :: R24 :: R25 :: R26 :: R27 :: R28 :: R29 :: R30 :: R31 :: nil. -Definition float_callee_save_regs := rev int_callee_save_regs. +Definition float_callee_save_regs : list mreg := nil. Definition destroyed_at_call := List.filter (fun r => negb (is_callee_save r)) all_mregs. |