*** empty log message ***
authorceriel <none@none>
Wed, 4 Mar 1987 09:54:23 +0000 (09:54 +0000)
committerceriel <none@none>
Wed, 4 Mar 1987 09:54:23 +0000 (09:54 +0000)
modules/src/read_em/reade.c

index 7c71bb3..4f25a2b 100644 (file)
@@ -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;
 }