- void * lexval_l;
-
-
- Assoc<String, Identifier*> *identifier_assoc_p_;
- Keyword_table * keytable_p_;
- int errorlevel_i_;
-
- /* *************** */
-
- Identifier*lookup_identifier(String s);
-
- void push_note_state();
- void push_lyric_state();
- void pop_state();
- void LexerError(char const *);
- My_lily_lexer();
- void add_identifier(Identifier*i);
- ~My_lily_lexer();
- int yylex();
- void print_declarations(bool init_b) const;
-
- bool note_state_b() const;
- bool lyric_state_b() const;
+ String main_input_str_;
+ void * lexval_l;
+ Scope * toplevel_scope_p_;
+ bool main_input_b_;
+
+ /*
+ Scheme hash tables with (oct name acc) values, and symbol keys
+ */
+ Protected_scm chordmodifier_tab_;
+ Protected_scm pitchname_tab_;
+
+ Link_array<Scope> scope_l_arr_;
+ Keyword_table * keytable_p_;
+ int errorlevel_i_;
+
+ My_lily_lexer ();
+ ~My_lily_lexer ();
+ int yylex ();
+
+ Input here_input () const;
+
+ void start_main_input ();
+ void set_chordmodifier_table (Notename_table*tab_p);
+ void set_notename_table (Notename_table*tab_p);
+
+ SCM lookup_identifier (String s);
+ void push_note_state();
+ void push_chord_state();
+ void push_lyric_state();
+ void pop_state();
+ void LexerError (char const *);
+ void set_identifier (String str, SCM);
+ bool note_state_b() const;
+ bool chord_state_b() const;
+ bool lyric_state_b() const;
+
+private:
+ int lookup_keyword (String);
+ int scan_bare_word (String);
+ int scan_escaped_word (String);
+
+ char escaped_char(char) const;