diff options
| author |  xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2011-07-30 09:54:35 +0000 |
|---|---|---|
| committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2011-07-30 09:54:35 +0000 |
| commit | 1fe68ad575178f7d8a775906947d2fed94d40976 (patch) | |
| tree | 3bb4b2d1b101f66bcb6f84bd36ce8e334082f7ea /arm/Machregsaux.ml | |
| parent | 9b45e1d24a337e3f0047bf5056315169d4203b49 (diff) | |
ARM codegen ported to new ABI + VFD floats
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1692 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'arm/Machregsaux.ml')
| -rw-r--r-- | arm/Machregsaux.ml | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/arm/Machregsaux.ml b/arm/Machregsaux.ml index fa72e14..642437e 100644 --- a/arm/Machregsaux.ml +++ b/arm/Machregsaux.ml @@ -18,10 +18,12 @@ let register_names = [ ("R0", R0); ("R1", R1); ("R2", R2); ("R3", R3); ("R4", R4); ("R5", R5); ("R6", R6); ("R7", R7); ("R8", R8); ("R9", R9); ("R11", R11); - ("F0", F0); ("F1", F1); - ("F4", F4); ("F5", F5); ("F6", F6); ("F7", F7); + ("F0", F0); ("F1", F1); ("F2", F2); ("F3", F3); + ("F4", F4); ("F5", F5); + ("F8", F8); ("F9", F9); ("F10", F10); ("F11", F11); + ("F12", F12);("F13", F13);("F14", F14); ("F15", F15); ("R10", IT1); ("R12", IT2); - ("F2", FT1); ("F3", FT2) + ("F6", FT1); ("F7", FT2) ] let name_of_register r = |