Fixed small parsing bug in apprentice.c

diff --git a/src/apprentice.c b/src/apprentice.c
index 561f178771d5adb0a1640b26dee751fabebee75a..6fad93c1805b2eb33459f4ea5e1356af7a0761a1 100644 (file)
--- a/src/apprentice.c
+++ b/src/apprentice.c
@@ -33,7 +33,7 @@
 
 #ifndef        lint
 static char *moduleid = 
-       "@(#)$Id: apprentice.c,v 1.17 1993/09/16 20:49:29 christos Exp $";
+       "@(#)$Id: apprentice.c,v 1.18 1993/09/23 20:19:42 christos Exp $";
 #endif /* lint */
 
 #define        EATAB {while (isascii((unsigned char) *l) && \
@@ -164,9 +164,11 @@ int *ndx, check;
                s = l;
                if (*l == '+' || *l == '-') l++;
                if (isdigit((unsigned char)*l)) {
-                   m->in.offset = strtol(l, &t, 0);
-                   if (*s == '-') m->in.offset = - m->in.offset;
+                       m->in.offset = strtol(l, &t, 0);
+                       if (*s == '-') m->in.offset = - m->in.offset;
                }
+               else
+                       t = l;
                if (*t++ != ')') 
                        magwarn("missing ')' in indirect offset");
                l = t;