home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / fed0217s.zip / source / pars_ml.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  2000-12-13  |  1020 b   |  54 lines
  1. /*
  2. ** Module   :PARS_ML.CPP
  3. ** Abstract :
  4. **
  5. ** Copyright (C) Sergey I. Yevtushenko
  6. **
  7. ** Log: Fri  31/07/1998 Created
  8. **
  9. */
  10.  
  11. #include <parser.h>
  12. #include <version.h>
  13.  
  14. //----------------------------------------------------------------------
  15. //
  16. // Class Parser_MAIL
  17. //
  18. //----------------------------------------------------------------------
  19.  
  20. void Parser_MAIL::reset(char *token, int initial_state)
  21. {
  22.     Parser::reset(token, initial_state);
  23.     line_start = token;
  24. }
  25.  
  26. int Parser_MAIL::next_token()
  27. {
  28.     old_tok = tok;
  29.     tok_len = 0;
  30.     color = CL_IDENT;
  31.     char *tmp = tok;
  32.  
  33.     if(tok == line_start)
  34.     {
  35.         while(*tmp != ' ' && *tmp)
  36.         {
  37.             if(*tmp == '>')
  38.             {
  39.                 color = CL_PREPROC;
  40.                 while(*tmp)
  41.                     tmp++;
  42.  
  43.                 return (tok_len = (tmp - tok));
  44.             }
  45.             tmp++;
  46.         }
  47.     }
  48.     tok_len = Parser::next_token();
  49.     color = CL_IDENT;
  50.     return tok_len;
  51. }
  52.  
  53.  
  54.