4 // source file of the LilyPond music typesetter
6 // (c) 1997 Jan Nieuwenhuizen <jan@digicash.com>
8 // should i be named Mudela_stream?
18 #include "source-file.hh"
20 #include "midi-main.hh" // *tors
22 #include "duration.hh"
23 #include "midi-event.hh"
24 #include "lily-stream.hh"
26 Lily_stream::Lily_stream( String filename_str
)
28 filename_str_
= filename_str
;
34 Lily_stream::~Lily_stream()
40 Lily_stream::operator <<( String str
)
47 Lily_stream::operator <<( Midi_event
& midi_event_r
)
49 midi_event_r
.output_mudela( *this );
56 *os_p_
<< "% Creator: " << version_str() << "\n";
57 *os_p_
<< "% Automatically generated, at ";
58 time_t t( time( 0 ) );
59 *os_p_
<< ctime( &t
);
60 *os_p_
<< "% from input file: ";
61 // *os_p_ << midi_parser_l_g->
68 os_p_
= new ofstream( filename_str_
);
70 error ( "can't open `" + filename_str_
+ "\'", 0 );