+2005-10-15 Han-Wen Nienhuys <hanwen@xs4all.nl>
+
+ * lily/include/*.hh (Module): lots of compile fixes.
+
2005-10-14 Heikki Junes <hjunes@cc.hut.fi>
* elisp/lilypond-font-lock.el, elisp/lilypond-indent.el: Avoid nil
/* constructor is public */
virtual void process (Moment);
DECLARE_SCHEME_CALLBACK (constructor, ());
+ DECLARE_CLASSNAME(Change_iterator);
private:
void error (String);
class Chord_tremolo_iterator : public Music_iterator
{
public:
+ DECLARE_CLASSNAME(Chord_tremolo_iterator);
DECLARE_SCHEME_CALLBACK (constructor, ());
Chord_tremolo_iterator ();
Chord_tremolo_iterator (Chord_tremolo_iterator const &);
Find a bottom notation context to deliver events to.
*/
virtual Context *get_bottom_context ();
+ DECLARE_CLASSNAME(Event_chord_iterator);
/*
Since Event_chord_iterator has no list-cursor internally, we
{
public:
DECLARE_SCHEME_CALLBACK (constructor, ());
+ DECLARE_CLASSNAME(Folded_repeat_iterator);
Folded_repeat_iterator (Folded_repeat_iterator const &src);
Folded_repeat_iterator ();
public:
virtual void process (Moment);
DECLARE_SCHEME_CALLBACK (constructor, ());
+ DECLARE_CLASSNAME(Grace_iterator);
Moment pending_moment () const;
};
class Midi_item
{
public:
+ DECLARE_CLASSNAME(Midi_item);
Midi_item ();
virtual ~Midi_item ();
virtual char const *name () const;
void set (String header_string, String data_string, String footer_string);
virtual String to_string () const;
virtual String data_string () const;
+ DECLARE_CLASSNAME(Midi_chunk);
private:
String data_string_;
class Midi_header : public Midi_chunk
{
public:
+ DECLARE_CLASSNAME(Midi_header);
+
Midi_header (int format_i, int tracks_i, int clocks_per_4_i);
};
public:
Midi_instrument (Audio_instrument *);
+ DECLARE_CLASSNAME(Midi_instrument);
virtual String to_string () const;
Audio_instrument *audio_;
{
public:
Midi_key (Audio_key *);
+ DECLARE_CLASSNAME(Midi_key);
virtual String to_string () const;
{
public:
Midi_time_signature (Audio_time_signature *);
+ DECLARE_CLASSNAME(Midi_time_signature);
virtual String to_string () const;
{
public:
Midi_note (Audio_note *);
+ DECLARE_CLASSNAME(Midi_note);
Moment get_length () const;
int get_pitch () const;
{
public:
Midi_note_off (Midi_note *);
+ DECLARE_CLASSNAME(Midi_note_off);
virtual String to_string () const;
TEXT = 1, COPYRIGHT, TRACK_NAME, INSTRUMENT_NAME, LYRIC,
MARKER, CUE_POINT
};
+ DECLARE_CLASSNAME(Midi_text);
Midi_text (Audio_text *);
{
public:
Midi_dynamic (Audio_dynamic *);
+ DECLARE_CLASSNAME(Midi_dynamic);
virtual String to_string () const;
{
public:
Midi_piano_pedal (Audio_piano_pedal *);
+ DECLARE_CLASSNAME(Midi_piano_pedal);
virtual String to_string () const;
{
public:
Midi_tempo (Audio_tempo *);
+ DECLARE_CLASSNAME(Midi_tempo);
virtual String to_string () const;
{
public:
int number_;
+ DECLARE_CLASSNAME(Midi_track);
/*
Compensate for starting grace notes.
Moment music_length_;
Moment start_mom_;
+ DECLARE_CLASSNAME(Music_iterator);
DECLARE_SMOBS (Music_iterator, dummy);
Music_iterator (Music_iterator const &);
#include "lily-proto.hh"
#include "protected-scm.hh"
#include "smobs.hh"
+#include "virtual-methods.hh"
class Music_output
{
DECLARE_SMOBS (Music_output, foo);
-
+ DECLARE_CLASSNAME(Music_output);
protected:
Music_output ();
public:
DECLARE_SCHEME_CALLBACK (constructor, ());
Music_wrapper_iterator ();
+ DECLARE_CLASSNAME(Music_wrapper_iterator);
virtual void derived_substitute (Context *f, Context *t);
virtual void derived_mark () const;
public:
Paper_score (Output_def *);
+ DECLARE_CLASSNAME(Paper_score);
+
Output_def *layout () const;
System *root_system () const;
class Percent_repeat_iterator : public Music_iterator
{
public:
+ DECLARE_CLASSNAME(Percent_repeat_iterator);
DECLARE_SCHEME_CALLBACK (constructor, ());
Percent_repeat_iterator ();
protected:
public:
Performance ();
~Performance ();
+ DECLARE_CLASSNAME(Performance);
void add_element (Audio_element *p);
public:
DECLARE_SCHEME_CALLBACK (constructor, ());
DECLARE_SCHEME_CALLBACK (once_finalization, (SCM, SCM));
+ DECLARE_CLASSNAME(Property_iterator);
protected:
virtual void do_quit ();
{
public:
DECLARE_SCHEME_CALLBACK (constructor, ());
+ DECLARE_CLASSNAME(Property_unset_iterator);
protected:
virtual void process (Moment);
};
public:
DECLARE_SCHEME_CALLBACK (constructor, ());
DECLARE_SCHEME_CALLBACK (once_finalization, (SCM, SCM));
+ DECLARE_CLASSNAME(Push_property_iterator);
protected:
virtual void process (Moment);
virtual void do_quit ();
{
public:
DECLARE_SCHEME_CALLBACK (constructor, ());
+ DECLARE_CLASSNAME(Pop_property_iterator);
protected:
virtual void process (Moment);
};
{
public:
DECLARE_SCHEME_CALLBACK (constructor, ());
+ DECLARE_CLASSNAME(Sequential_iterator);
Sequential_iterator ();
Sequential_iterator (Sequential_iterator const &);
virtual void derived_substitute (Context *f, Context *t);
virtual void process (Moment);
virtual Music_iterator *try_music_in_children (Music *) const;
virtual bool run_always () const;
+
protected:
Music_iterator *iter_;
- virtual SCM get_music_list ()const;
+
+ virtual SCM get_music_list () const;
virtual void next_element (bool side_effect);
Grace_fixup *get_grace_fixup () const;
{
public:
DECLARE_SCHEME_CALLBACK (constructor, ());
+ DECLARE_CLASSNAME(Sequential_music_iterator);
private:
virtual SCM get_music_list ()const;
};
class Simple_music_iterator : public Music_iterator
{
protected:
+ DECLARE_CLASSNAME(Simple_music_iterator);
Moment last_processed_mom_;
public:
virtual void derived_substitute (Context *f, Context *t);
virtual void derived_mark () const;
DECLARE_SCHEME_CALLBACK (constructor, ());
+ DECLARE_CLASSNAME(Simultaneous_music_iterator);
/// make a new context for every child.
bool create_separate_contexts_;
public:
DECLARE_SCHEME_CALLBACK (constructor, ());
/* construction */
+ DECLARE_CLASSNAME(Time_scaled_music_iterator);
protected:
virtual void process (Moment);
};
char const *
Midi_item::name () const
{
- return this->class_name ();
+ return this->class_name ();
}
bool accepted = try_music (get_music ());
if (!accepted)
get_music ()->origin ()->warning (_f ("junking event: `%s'",
- get_music (->class_name ())));
+ get_music ()->class_name ()));
}
Simple_music_iterator::process (m);
}
{
Paper_book *b = (Paper_book *) SCM_CELL_WORD_1 (smob);
- scm_puts ("#<", port);
- scm_puts (b->class_name (), port);
- scm_puts (" ", port);
- scm_puts (">", port);
+ scm_puts ("#<Paper_book>", port);
return 1;
}