diff options
Diffstat (limited to 'asmcomp/hppa/selection.ml')
| -rw-r--r-- | asmcomp/hppa/selection.ml | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/asmcomp/hppa/selection.ml b/asmcomp/hppa/selection.ml index 24db6cd900..6a0e9fe409 100644 --- a/asmcomp/hppa/selection.ml +++ b/asmcomp/hppa/selection.ml @@ -92,17 +92,17 @@ method select_operation op args = (* Deal with register constraints *) -method insert_op op rs rd = +method insert_op_debug op dbg rs rd = match op with Iintop(Idiv | Imod) -> (* handled via calls to millicode *) let rs' = [|phys_reg 20; phys_reg 19|] (* %r26, %r25 *) and rd' = [|phys_reg 22|] (* %r29 *) in self#insert_moves rs rs'; - self#insert (Iop op) rs' rd'; + self#insert_debug (Iop op) dbg rs' rd'; self#insert_moves rd' rd; rd | _ -> - super#insert_op op rs rd + super#insert_op_debug op dbg rs rd end |