diff --git a/lib/Target/PowerPC/PPCInstrInfo.td b/lib/Target/PowerPC/PPCInstrInfo.td
index eb100ec..7310bcc 100644
--- a/lib/Target/PowerPC/PPCInstrInfo.td
+++ b/lib/Target/PowerPC/PPCInstrInfo.td
@@ -461,7 +461,7 @@ let isCall = 1, PPC970_Unit = 7,
           LR,CTR,
           CR0,CR1,CR5,CR6,CR7,CARRY] in {
   // Convenient aliases for call instructions
-  let Uses = [RM] in {
+  let Uses = [RM, CR1EQ] in {
     def BL_SVR4  : IForm<18, 0, 1,
                         (outs), (ins calltarget:$func, variable_ops),
                         "bl $func", BrB, []>;  // See Pat patterns below.
@@ -470,7 +470,7 @@ let isCall = 1, PPC970_Unit = 7,
                         "bla $func", BrB,
                         [(PPCcall_SVR4 (i32 imm:$func))]>;
   }
-  let Uses = [CTR, RM] in {
+  let Uses = [CTR, RM, CR1EQ] in {
     def BCTRL_SVR4 : XLForm_2_ext<19, 528, 20, 0, 1,
                                 (outs), (ins variable_ops),
                                 "bctrl", BrB,