home *** CD-ROM | disk | FTP | other *** search
/ The CDPD Public Domain Collection for CDTV 3 / CDPDIII.bin / pd / programming / utils / toolbox / lib / lalr / scanner.def < prev    next >
Encoding:
Text File  |  1993-03-12  |  332 b   |  15 lines
  1. (* $Id: Scanner.md,v 2.2 1992/08/07 15:28:42 grosch rel $ *)
  2.  
  3. $@ DEFINITION MODULE $;
  4.  
  5. FROM Positions    IMPORT tPosition;
  6.  
  7. TYPE tScanAttribute    = RECORD Position: tPosition; END;
  8.  
  9. VAR  Attribute        : tScanAttribute;
  10.  
  11. PROCEDURE GetToken ()    : CARDINAL;
  12. PROCEDURE ErrorAttribute (Token: CARDINAL; VAR Attribute: tScanAttribute);
  13.  
  14. $@ END $.
  15.