source file of the GNU LilyPond music typesetter
- (c) 1998--2000 Jan Nieuwenhuizen <janneke@gnu.org>
+ (c) 1998--2007 Jan Nieuwenhuizen <janneke@gnu.org>
*/
-
#ifndef HARA_KIRI_VERTICAL_GROUP_SPANNER_HH
#define HARA_KIRI_VERTICAL_GROUP_SPANNER_HH
-#include "spanner.hh"
-
-/**
- As Vertical_group_spanner, but keep track of interesting items. If
- we don't contain any interesting items after linebreaking, then
- gracefully commit suicide. Objective: don't disgrace Lily by
- typesetting empty lines in orchestral scores.
-
- properties:
-
- items-worth-living -- list of interesting items. If empty in a particular system,
- clear this line
+#include "lily-proto.hh"
+#include "grob-interface.hh"
-*/
-class Hara_kiri_group_spanner : public Spanner
+class Hara_kiri_group_spanner
{
public:
- static Real force_hara_kiri_callback (Score_element const* , Axis);
- Hara_kiri_group_spanner (SCM);
- SCM member_after_line_breaking ();
- static SCM after_line_breaking (SCM);
-
- void add_interesting_item (Item* n);
-
- VIRTUAL_COPY_CONS(Score_element);
+ DECLARE_SCHEME_CALLBACK (force_hara_kiri_callback, (SCM));
+ DECLARE_SCHEME_CALLBACK (y_extent, (SCM smob));
+ DECLARE_SCHEME_CALLBACK (pure_height, (SCM smob, SCM start, SCM end));
+ DECLARE_SCHEME_CALLBACK (force_hara_kiri_in_y_parent_callback, (SCM));
+ DECLARE_SCHEME_CALLBACK (after_line_breaking, (SCM));
+ DECLARE_GROB_INTERFACE();
+ static bool request_suicide (Grob *me, int start, int end);
+ static void consider_suicide (Grob *me);
+ static void add_interesting_item (Grob *me, Grob *n);
};
-
#endif // HARA_KIRI_VERTICAL_GROUP_SPANNER_HH