diff --git a/packages/gperf/build.sh b/packages/gperf/build.sh
index 3ee2947261..74148a99a7 100644
--- a/packages/gperf/build.sh
+++ b/packages/gperf/build.sh
@@ -3,7 +3,7 @@ TERMUX_PKG_DESCRIPTION="A perfect hash function generator"
 TERMUX_PKG_LICENSE="GPL-3.0"
 TERMUX_PKG_MAINTAINER="@termux"
 TERMUX_PKG_VERSION=3.1
-TERMUX_PKG_REVISION=6
+TERMUX_PKG_REVISION=7
 TERMUX_PKG_SRCURL=https://mirrors.kernel.org/gnu/gperf/gperf-${TERMUX_PKG_VERSION}.tar.gz
 TERMUX_PKG_SHA256=588546b945bba4b70b6a3a616e80b4ab466e3f33024a352fc2198112cdbb3ae2
 TERMUX_PKG_DEPENDS="libc++"
diff --git a/packages/gperf/lib-getline.cc.patch b/packages/gperf/lib-getline.cc.patch
new file mode 100644
index 0000000000..89962a7458
--- /dev/null
+++ b/packages/gperf/lib-getline.cc.patch
@@ -0,0 +1,12 @@
+diff -u -r ../orig-src/lib/getline.cc ./lib/getline.cc
+--- ../orig-src/lib/getline.cc	2023-10-02 11:41:12.201611420 +0000
++++ ./lib/getline.cc	2023-10-02 11:43:12.677004096 +0000
+@@ -55,7 +55,7 @@
+ 
+   for (;;)
+     {
+-      register int c = getc (stream);
++      int c = getc (stream);
+ 
+       /* We always want at least one char left in the buffer, since we
+          always (unless we get an error while reading the first char)