summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--asmcomp/power/proc.ml4
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