]> git.donarmstrong.com Git - lilypond.git/blobdiff - mi2mu/my-midi-lexer.cc
release: 0.0.45
[lilypond.git] / mi2mu / my-midi-lexer.cc
index ba578d1dfc5bf21719fa8c515dedc3a311210db3..8893005c76758d5878d00c0d00791959fb765737 100644 (file)
@@ -15,21 +15,21 @@ My_midi_lexer* midi_lexer_l_g = 0;
 
 My_midi_lexer::My_midi_lexer( String &filename_str, Sources * sources )
 {
-    source_file_p_ =sources->get_file_l(filename_str);
-    switch_streams( source_file_p_->istream_l() );
+    source_file_l_ =sources->get_file_l(filename_str);
+    switch_streams( source_file_l_->istream_l() );
     errorlevel_i_ = 0;
     char_count_ = 0;
 }
 
 My_midi_lexer::~My_midi_lexer()
 {
-    delete source_file_p_;
+//    delete source_file_p_;
 }
 
 void
 My_midi_lexer::error( char const* sz_l )
 {
-    if ( !source_file_p_ ) {
+    if ( !source_file_l_ ) {
        cerr << "error at EOF" << sz_l << '\n';
     } else {
        char const* ch_C = here_ch_C();
@@ -47,7 +47,7 @@ My_midi_lexer::error( char const* sz_l )
 char const*
 My_midi_lexer::here_ch_C()
 {
-    return source_file_p_->ch_C() + char_count_ ;
+    return source_file_l_->ch_C() + char_count_ ;
 }
 
 int