File s390-option-defaults of Package gcc43

Index: gcc/config/s390/s390.c
===================================================================
*** gcc/config/s390/s390.c.orig
--- gcc/config/s390/s390.c
*************** override_options (void)
*** 1650,1658 ****
      target_flags |= MASK_LONG_DOUBLE_128;
  #endif
  
!   if (s390_tune == PROCESSOR_2097_Z10
!       && !PARAM_SET_P (PARAM_MAX_UNROLLED_INSNS))
!     set_param_value ("max-unrolled-insns", 100);
  }
  
  /* Map for smallest class containing reg regno.  */
--- 1650,1666 ----
      target_flags |= MASK_LONG_DOUBLE_128;
  #endif
  
!   if (s390_tune == PROCESSOR_2097_Z10)
!     {
!       if (!PARAM_SET_P (PARAM_MAX_UNROLLED_INSNS))
! 	set_param_value ("max-unrolled-insns", 100);
!       if (!PARAM_SET_P (PARAM_MAX_UNROLL_TIMES))
! 	set_param_value ("max-unroll-times", 32);
!       if (!PARAM_SET_P (PARAM_MAX_COMPLETELY_PEELED_INSNS))
! 	set_param_value ("max-completely-peeled-insns", 800);
!       if (!PARAM_SET_P (PARAM_MAX_COMPLETELY_PEEL_TIMES))
! 	set_param_value ("max-completely-peel-times", 64);
!     }
  }
  
  /* Map for smallest class containing reg regno.  */