s390.h (HARD_REGNO_MODE_OK): Fix warning regression introduced by last change.

        * config/s390/s390.h (HARD_REGNO_MODE_OK): Fix warning regression
        introduced by last change.

From-SVN: r61638

gcc/ChangeLog

+2003-01-22  Ulrich Weigand  <uweigand@de.ibm.com>
+
+	* config/s390/s390.h (HARD_REGNO_MODE_OK): Fix warning regression
+	introduced by last change.
+
 2003-01-22  Andreas Schwab  <schwab@suse.de>
 
 	* ra-rewrite.c (rewrite_program2): Initialize bb to avoid warning.

gcc/config/s390/s390.h

@@ -357,7 +357,7 @@ do								\
    CC_REGNO_P(REGNO)?                                               \
      GET_MODE_CLASS (MODE) == MODE_CC :                             \
    FRAME_REGNO_P(REGNO)?                                            \
-     (MODE) == Pmode :                                              \
+     (enum machine_mode) (MODE) == Pmode :                          \
    0)
 
 #define MODES_TIEABLE_P(MODE1, MODE2)		\