diff --git a/gdb-fix-s390-build.patch b/gdb-fix-s390-build.patch
new file mode 100644
index 0000000..d728870
--- /dev/null
+++ b/gdb-fix-s390-build.patch
@@ -0,0 +1,13 @@
+Index: gdb-7.7/gdb/s390-linux-nat.c
+===================================================================
+--- gdb-7.7.orig/gdb/s390-linux-nat.c	2014-02-12 16:10:55.000000000 +0100
++++ gdb-7.7/gdb/s390-linux-nat.c	2014-02-12 16:40:33.000000000 +0100
+@@ -563,7 +563,7 @@ s390_can_use_hw_breakpoint (int type, in
+ }
+ 
+ static int
+-s390_region_ok_for_hw_watchpoint (CORE_ADDR addr, int cnt)
++s390_region_ok_for_hw_watchpoint (CORE_ADDR addr, LONGEST cnt)
+ {
+   return 1;
+ }
diff --git a/gdb.changes b/gdb.changes
index 3cb16b8..53fce78 100644
--- a/gdb.changes
+++ b/gdb.changes
@@ -1,3 +1,8 @@
+-------------------------------------------------------------------
+Wed Feb 12 16:24:38 UTC 2014 - matz@suse.de
+
+- Fix build on s390 (gdb-fix-s390-build.patch).
+
 -------------------------------------------------------------------
 Mon Feb 10 17:19:07 UTC 2014 - matz@suse.de
 
diff --git a/gdb.spec b/gdb.spec
index 6474ee3..c77f715 100644
--- a/gdb.spec
+++ b/gdb.spec
@@ -195,6 +195,7 @@ Patch106:       gdb-rhel5-compat.patch
 Patch1002:      gdb-6.6-buildid-locate-rpm-suse.patch
 Patch1004:      gdb-ia64-tdep.patch
 Patch1006:      gdb-ppc64le.patch
+Patch1007:      gdb-fix-s390-build.patch
 
 BuildRequires:  bison
 BuildRequires:  flex
@@ -441,6 +442,7 @@ find -name "*.info*"|xargs rm -f
 %patch1002 -p1
 %patch1004 -p1
 %patch1006 -p1
+%patch1007 -p1
 
 find -name "*.orig" | xargs rm -f
 ! find -name "*.rej" # Should not happen.