From cc8a28ef83d74f6688167b420fbdcb92b463898d Mon Sep 17 00:00:00 2001
From: ceriel <devnull@localhost>
Date: Mon, 19 Jun 1989 11:09:44 +0000
Subject: [PATCH] avoid a null-reference

---
 modules/src/read_em/readk.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/modules/src/read_em/readk.c b/modules/src/read_em/readk.c
index a44c66d0..ab82b79e 100644
--- a/modules/src/read_em/readk.c
+++ b/modules/src/read_em/readk.c
@@ -246,7 +246,8 @@ getstring(isident)
 #ifdef CHECKING
 		if (strleft < 0) {
 			xerror("Negative length in string");
-			return 0;
+			s->length = 0;
+			return s;
 		}
 #endif CHECKING
 	}