* haifa-sched.c (print_value): Fix last change.

From-SVN: r15181

gcc/ChangeLog

+Tue Sep  9 09:12:17 1997  Jeffrey A Law  (law@cygnus.com)
+
+	* haifa-sched.c (print_value): Fix last change.
+
 Mon Sep  8 15:15:11 1997  Nick Clifton  <nickc@cygnus.com>
 
 	* v850.h (ASM_SPEC): Pass on target processor.

gcc/haifa-sched.c

@@ -6089,11 +6089,11 @@ print_value (buf, x, verbose)
 	strcpy (t, "fr");
       else
 	strcpy (t, "r");
-      sprintf (buf, "%s%d", t, !! XEXP (x, 0));
+      sprintf (buf, "%s%d", t, REGNO (x));
       break;
     case SUBREG:
       print_value (t, XEXP (x, 0), verbose);
-      sprintf (buf, "%s#%d", t, !! XEXP (x, 1));
+      sprintf (buf, "%s#%d", t, SUBREG_WORD (x));
       break;
     case SCRATCH:
       sprintf (buf, "scratch");