lily/include/stream-event.hh

   1 /*
   2   stream-event.hh -- declare Stream_event
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 2005-2006 Erik Sandberg <mandolaerik@gmail.com>
   7 */
   8
   9 #ifndef STREAM_EVENT_HH
  10 #define STREAM_EVENT_HH
  11
  12 #include "lily-proto.hh"
  13 #include "smobs.hh"
  14 #include "prob.hh"
  15
  16 class Stream_event
  17 {
  18   void init ();
  19   SCM property_alist_;
  20   Input *origin_;
  21
  22 public:
  23   Stream_event ();
  24   Input *origin () const;
  25
  26   DECLARE_SCHEME_CALLBACK (undump, (SCM));
  27   DECLARE_SCHEME_CALLBACK (dump, (SCM));
  28
  29   // todo: make Input mandatory.
  30   Stream_event (SCM property_alist);
  31   Stream_event (Context *c, SCM class_name);
  32   Stream_event (Context *c, Input *);
  33   Stream_event (Stream_event *ev);
  34
  35   SCM internal_get_property (SCM) const;
  36   void internal_set_property (SCM prop, SCM val);
  37
  38 protected:
  39   DECLARE_SMOBS (Stream_event,);
  40 };
  41
  42 DECLARE_UNSMOB (Stream_event, stream_event);
  43 DECLARE_TYPE_P (Stream_event);
  44
  45 #endif /* STREAM_EVENT_HH */