home *** CD-ROM | disk | FTP | other *** search
- /*
- * Bob Denny 28-Aug-82 Remove reference to stdio.h
- * Scott Guthery 20-Nov-83 Adapt for IBM PC & DeSmet C
- */
-
- #include <lex.h>
-
- int _lmovi(register struct lextab *lp, register int c, register int st)
- {
- int base;
-
- while ((base = lp->llbase[st]+c) > lp->llnxtmax ||
- ((int *)lp->llcheck)[base]!=st)
- if (st != lp->llendst) {
- /*
- * This miscompiled on Decus C many years ago
- * st = ((int *)lp->lldefault)[st];
- */
- base = ((int *)lp->lldefault)[st];
- st = base;
- }
- else
- return(-1);
- return(((int *)lp->llnext)[base]);
- }
-