fixed bug with linenumber counting
authorceriel <none@none>
Wed, 29 Jun 1988 14:05:37 +0000 (14:05 +0000)
committerceriel <none@none>
Wed, 29 Jun 1988 14:05:37 +0000 (14:05 +0000)
modules/src/read_em/read_em.c

index b844289..f652459 100644 (file)
@@ -251,12 +251,11 @@ EM_getinstr(p)
                        i = em_ptyp[j];
                        if (j == PAR_NO) {      /* No arguments */
                                p->em_argtype = 0;
-                               break;
                        }
 #ifndef COMPACT
                        if (j == PAR_B) i = ptyp(sp_ilb2);
 #endif COMPACT
-                       getarg(i, &(p->em_arg));
+                       if (j != PAR_NO) getarg(i, &(p->em_arg));
 #ifndef COMPACT
                        if (j == PAR_B) {
                                p->em_cst = p->em_ilb;