diff options
-rw-r--r-- | asmcomp/power/proc.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/asmcomp/power/proc.ml b/asmcomp/power/proc.ml index 846a3c03d..032e29b4b 100644 --- a/asmcomp/power/proc.ml +++ b/asmcomp/power/proc.ml @@ -85,8 +85,8 @@ let rotate_registers = true (* Representation of hard registers by pseudo-registers *) let hard_int_reg = - let v = Array.create 24 Reg.dummy in - for i = 0 to 23 do v.(i) <- Reg.at_location Int (Reg i) done; v + let v = Array.create 23 Reg.dummy in + for i = 0 to 22 do v.(i) <- Reg.at_location Int (Reg i) done; v let hard_float_reg = let v = Array.create 31 Reg.dummy in |