dlp_lex


  %class dlp_lex
  %e 5000
  
  
  include <ml/dlp/lex.h>
  
  define LEXDEBUG 1
  int yyout = 2; // AE: what ?
  include <iostream.h>
  include "yacc.tab.h"
  
  dlp_lex::dlp_lex(istream* in, ostream* out) : lex_scanner(in,out) { 
          }
  
  int dlp_lex::_op() { return OP0; /*257 is already predefined*/ }
  
  static int _debug = 0;
  static int in_obj = 0;
  static int bracks = 0;
  static char buf[1024];
  
  define P(X) if (_debug) *yyerr << "-" << X << "-";
  define found(tok,s,yytext) if (_debug && s) { \
               cerr << "Found: " << yytext << " = " \ 
               << s << " " << tok << endl; }
  
  

slide: dlp_lex