home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / OS2-YACC.ZIP / YCHFND.2C < prev    next >
Text File  |  1989-09-29  |  1KB  |  48 lines
  1. /*
  2.   HEADER: CUG     nnn.nn;
  3.   TITLE:     YACC - Yet Another Compilier-Compilier
  4.   VERSION:     1.0 for IBM-PC
  5.   DATE:      JAN 28, 1985
  6.   DESCRIPTION:     LALR(1) Parser Generator. From UNIX
  7.   KEYWORDS:     Parser Generator Compilier-Compilier YACC
  8.   SYSTEM:     IBM-PC and Compatiables
  9.   FILENAME:      YCHFND.2C
  10.   WARNINGS:     This program is not for the casual user. It will
  11.          be useful primarily to expert developers.
  12.   CRC:         N/A
  13.   SEE-ALSO:     LEX and PREP
  14.   AUTHORS:     Scott Guthery 11100 leafwood lane Austin, TX 78750
  15.   COMPILERS:     DESMET-C
  16.   REFERENCES:     UNIX Systems Manuals
  17. */
  18.  
  19. #include <string.h>
  20. #include "y1.h"
  21. #include "y2.h"
  22.  
  23. int chfind( int t, register char *s )
  24.  
  25.    {
  26.    int i;
  27.  
  28.    if (s[0]==' ')t=0;
  29.    TLOOP(i)
  30.       {
  31.       if(!strcmp(s,tokset[i].name))
  32.          {
  33.          return( i );
  34.          }
  35.       }
  36.    NTLOOP(i)
  37.       {
  38.       if(!strcmp(s,nontrst[i].name)) 
  39.          {
  40.          return( i+NTBASE );
  41.          }
  42.       }
  43.    /* cannot find name */
  44.    if( t>1 )
  45.       error( "%s should have been defined earlier", s );
  46.    return( defin( t, s ) );
  47.    }
  48.