lily/include/my-lily-lexer.hh

   1 /*
   2   lexer.hh -- declare My_lily_lexer
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c)  1997--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7 */
   8
   9 #ifndef LEXER_HH
  10 #define LEXER_HH
  11
  12 #include "includable-lexer.hh"
  13
  14 #include "input.hh"
  15 #include "lily-proto.hh"
  16 #include "flower-proto.hh"
  17 #include "array.hh"
  18 #include "string.hh"
  19 #include "duration.hh"
  20 #include "pitch.hh"
  21 #include "protected-scm.hh"
  22
  23 bool busy_parsing ();
  24 void kill_lexer ();
  25 void set_lexer ();
  26
  27 /// lexer for LilyPond
  28 class My_lily_lexer : public Includable_lexer
  29 {
  30   Protected_scm scopes_;
  31 public:
  32   String main_input_name_;
  33   void * lexval;
  34   bool main_input_b_;
  35
  36   /*
  37     Scheme hash tables with (oct name acc)  values, and symbol keys
  38    */
  39   Protected_scm chordmodifier_tab_;
  40   Protected_scm pitchname_tab_;
  41   Keyword_table * keytable_;
  42   int errorlevel_;
  43
  44   My_lily_lexer ();
  45   ~My_lily_lexer ();
  46   int yylex ();
  47
  48   Input last_input_;
  49   void prepare_for_next_token ();
  50   int try_special_identifiers (SCM* ,SCM);
  51   Input here_input () const;
  52
  53   void add_scope (SCM);
  54   SCM remove_scope ();
  55
  56   void start_main_input ();
  57
  58   SCM lookup_identifier (String s);
  59   void push_note_state ();
  60   void push_markup_state ();
  61   void push_figuredbass_state ();
  62   void push_chord_state ();
  63   void push_lyric_state ();
  64   void pop_state ();
  65   void LexerError (char const *);
  66   void set_identifier (SCM name_string, SCM);
  67   bool note_state_b () const;
  68   bool chord_state_b () const;
  69   bool lyric_state_b () const;
  70   bool figure_state_b () const;
  71 private:
  72   int lookup_keyword (String);
  73   int scan_bare_word (String);
  74   SCM scan_markup_word (String);
  75   int scan_escaped_word (String);
  76   int identifier_type (SCM);
  77   char escaped_char (char) const;
  78 };
  79
  80 #endif