release: 1.3.60

[lilypond.git] / lily / include / my-lily-lexer.hh

diff --git a/lily/include/my-lily-lexer.hh b/lily/include/my-lily-lexer.hh
index c3f2bfa38853a24827307f8108ca6f5d468d5ff3..b3113bf94b47cfcfe2b36fa6f8176cfac2a476b9 100644 (file)
--- a/lily/include/my-lily-lexer.hh
+++ b/lily/include/my-lily-lexer.hh
@@ -1,79 +1,76 @@
 /*
   lexer.hh -- declare My_lily_lexer
 
-  source file of the LilyPond music typesetter
+  source file of the GNU LilyPond music typesetter
 
-  (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
+  (c)  1997--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 */
 
 #ifndef LEXER_HH
 #define LEXER_HH
+
 #include <FlexLexer.h>
-#include "proto.hh"
-#include "fproto.hh"
-#include "varray.hh"
+
+#include "dictionary.hh"
+#include "lily-proto.hh"
+#include "flower-proto.hh"
+#include "array.hh"
 #include "string.hh"
+#include "includable-lexer.hh"
+#include "duration.hh"
+#include "musical-pitch.hh"
+#include "protected-scm.hh"
 
-int yylex();
-void yyerror(char const *s);
 bool busy_parsing();
 void kill_lexer();
 void set_lexer();
 
+/// lexer for Mudela
+class My_lily_lexer : public Includable_lexer 
+{
+public:
+  String main_input_str_;
+  void * lexval_l;
+  Scope * toplevel_scope_p_;
+  bool main_input_b_;
 
-struct Lexer_prefs {
-    int default_duration, default_dots, default_octave_i_;
-    int default_plet_type, default_plet_dur;
-    String textstyle_str_;
-    
-    bool last_duration_mode ;
-    
-    Lexer_prefs();
-    Moment plet_mom();
-    void set_default_duration(int *);
-    void set_last_duration(int n);
-    void set_duration_mode(String s);
-    void get_default_duration(int *);
-    void set_plet(int,int);
-};
+  /*
+    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_;
 
-/// lexer with provisions for include files.
-class My_lily_lexer : public yyFlexLexer {
-    int lookup_keyword(String);
-    void lookup_notename(int &large, int &small, String s);
-    int scan_bare_word(String);
-    int scan_escaped_word(String);
+  My_lily_lexer ();
+  ~My_lily_lexer ();
+  int yylex ();
 
-public:
-    Lexer_prefs prefs;
-    
-    Array<Input_file*> include_stack_;
-    Assoc<String, Identifier*> *identifier_assoc_p_;
-    Keyword_table * keytable_p_;
-    int errorlevel_i_;
+  Input here_input () const;
 
-    /* *************** */
+  void start_main_input ();
+  void set_chordmodifier_table (Notename_table*tab_p);
+  void set_notename_table (Notename_table*tab_p);
 
-    Identifier*lookup_identifier(String s);
-    char const* here_ch_c_l();
- 
-    void push_note_state();
-    void push_lyric_state();
-    void pop_state();
-    void LexerError(char const *);
-    String spot() const;
-    My_lily_lexer();
-    void add_identifier(Identifier*i);
-    ~My_lily_lexer();
-    void new_input(String s);
-    bool  close_input();
-    int yylex();
-    void print_init_declarations() const;
-    void print_user_declarations() const;
-    bool note_state_b() const;
-    bool lyric_state_b() const;
-};
+  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;
 
-extern My_lily_lexer *lexer;
+private:
+  int lookup_keyword (String);
+  int scan_bare_word (String);
+  int scan_escaped_word (String);
+
+  char escaped_char(char) const;
+};
 
 #endif