[Committed] S/390: Fix recent fixuns_trunc/real_2expN changes

[Andreas Krebbel]

Hello,

this chunk ...

-  real_2expN (&cmp, GET_MODE_BITSIZE(<GPR:MODE>mode) - 1);
-  real_2expN (&sub, GET_MODE_BITSIZE(<GPR:MODE>mode));
+  real_2expN (&cmp, GET_MODE_BITSIZE(<GPR:MODE>mode) - 1, <BFP:mode>mode);
+  real_2expN (&sub, GET_MODE_BITSIZE(<GPR:MODE>mode), <BFP:mode>mode);

of ...

http://gcc.gnu.org/ml/gcc-patches/2007-09/msg00569.html

broke S/390 bootstrap.  Fixed with the attached patch.

Committed to mainline.

Bye,

-Andreas-


2007-09-10  Andreas Krebbel  <krebbel1@de.ibm.com>

	* config/s390/s390.md ("fixuns_trunc<BFP:mode><GPR:mode>2"):
	Change mode macro in the last real_2expN parameter to uppercase.


Index: gcc/config/s390/s390.md
===================================================================
*** gcc/config/s390/s390.md.orig	2007-09-10 09:56:49.000000000 +0200
--- gcc/config/s390/s390.md	2007-09-10 10:27:41.000000000 +0200
***************
*** 3295,3302 ****
    REAL_VALUE_TYPE cmp, sub;
    
    operands[1] = force_reg (<BFP:MODE>mode, operands[1]);
!   real_2expN (&cmp, GET_MODE_BITSIZE(<GPR:MODE>mode) - 1, <BFP:mode>mode);
!   real_2expN (&sub, GET_MODE_BITSIZE(<GPR:MODE>mode), <BFP:mode>mode);
    
    emit_insn (gen_cmp<BFP:mode> (operands[1],
  	CONST_DOUBLE_FROM_REAL_VALUE (cmp, <BFP:MODE>mode)));
--- 3295,3302 ----
    REAL_VALUE_TYPE cmp, sub;
    
    operands[1] = force_reg (<BFP:MODE>mode, operands[1]);
!   real_2expN (&cmp, GET_MODE_BITSIZE(<GPR:MODE>mode) - 1, <BFP:MODE>mode);
!   real_2expN (&sub, GET_MODE_BITSIZE(<GPR:MODE>mode), <BFP:MODE>mode);
    
    emit_insn (gen_cmp<BFP:mode> (operands[1],
  	CONST_DOUBLE_FROM_REAL_VALUE (cmp, <BFP:MODE>mode)));