From: ceriel <none@none>
Date: Wed, 4 Mar 1987 09:54:23 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Tag: release-5-5~4520
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=25dfa91caa45f4956b9177f12b979a3ebc946eb2;p=ack.git

*** empty log message ***
---

diff --git a/modules/src/read_em/reade.c b/modules/src/read_em/reade.c
index 7c71bb362..4f25a2b43 100644
--- a/modules/src/read_em/reade.c
+++ b/modules/src/read_em/reade.c
@@ -280,6 +280,7 @@ getnumber(c, ap)
 	if (! isdigit(c)) {
 		ungetbyte(c);
 		syntax("digit expected");
+		i_strings--;
 		return sp_cst4;
 	}
 
@@ -288,6 +289,7 @@ getnumber(c, ap)
 	for (;;) {
 		if (p >= &(s->str[STRSIZ])) {
 			syntax("number too long");
+			i_strings--;
 			return sp_cst4;
 		}
 
@@ -582,6 +584,7 @@ line_line()
 	ap = gettyp(str_ptyp);
 	btscpy(filebuf, ap->em_str, (int) ap->em_size);
 	i_emargs--;
+	i_strings--;
 	EM_filename = filebuf;
 }