Index: gcc/config/s390/s390.md
===================================================================
*** gcc/config/s390/s390.md.orig
--- gcc/config/s390/s390.md
***************
*** 7046,7066 ****
     (set_attr "type"     "fsimp<mode>")])
  
  ;;
- ;;- Copy sign instructions
- ;;
- 
- ; cpsdr
- (define_insn "copysign<mode>3"
-   [(set (match_operand:FP 0 "register_operand" "=f")
- 	(unspec:FP [(match_operand:FP 1 "register_operand" "<fT0>")
- 		    (match_operand:FP 2 "register_operand" "f")]
- 		    UNSPEC_COPYSIGN))]
-   "TARGET_DFP"
-   "cpsdr\t%0,%2,%1"
-   [(set_attr "op_type"  "RRF")
-    (set_attr "type"     "fsimp<mode>")])
- 
- ;;
  ;;- Square root instructions.
  ;;
  
--- 7046,7051 ----