diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 8fd098bc85a..2a33ff416c7 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,9 @@
+2016-11-30  Markus Trippelsdorf  <markus@trippelsdorf.de>
+
+	PR ipa/78555
+	* real.c (real_hash): Add cast to avoid left
+	shifting of negative values.
+
 2016-11-30  Kyrylo Tkachov  <kyrylo.tkachov@arm.com>
 
 	PR target/78362
diff --git a/gcc/real.c b/gcc/real.c
index 66e88e2ad36..eabe22de851 100644
--- a/gcc/real.c
+++ b/gcc/real.c
@@ -2887,7 +2887,7 @@ real_hash (const REAL_VALUE_TYPE *r)
       return h;
 
     case rvc_normal:
-      h |= REAL_EXP (r) << 3;
+      h |= (unsigned int)REAL_EXP (r) << 3;
       break;
 
     case rvc_nan: