home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_progs / fileutil / scan.lha / src / lmovb.c < prev    next >
C/C++ Source or Header  |  1992-05-21  |  717b  |  30 lines
  1. /*
  2.  * Bob Denny     28-Aug-82  Remove reference to stdio.h
  3.  * Scott Guthery 20-Nov-83      Adapt for IBM PC & DeSmet C
  4.  */
  5.  
  6. #include "lex.h"
  7.  
  8. _lmovb(lp, c, st)
  9. register int c, st;
  10. register struct lextab *lp;
  11. {
  12.         int base;
  13.  
  14.         while ((base = lp->llbase[st]+c) > lp->llnxtmax ||
  15.                         (lp->llcheck[base] & 0377) != st) {
  16.  
  17.                 if (st != lp->llendst) {
  18. /*
  19.  * This miscompiled on Decus C many years ago:
  20.  *                      st = lp->lldefault[st] & 0377;
  21.  */
  22.                         base = lp->lldefault[st] & 0377;
  23.                         st = base;
  24.                 }
  25.                 else
  26.                         return(-1);
  27.         }
  28.         return(lp->llnext[base]&0377);
  29. }
  30.