2 single-malt-grouping-item.cc -- implement Single_malt_grouping_item
4 source file of the GNU LilyPond music typesetter
6 (c) 1998--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
10 #include "single-malt-grouping-item.hh"
14 Single_malt_grouping_item ::Single_malt_grouping_item()
16 set_elt_property (break_helper_only_scm_sym
, SCM_BOOL_T
);
17 set_elt_property (transparent_scm_sym
, SCM_BOOL_T
);
19 // this is weird! , but needed!
24 Single_malt_grouping_item::add_item (Item
* i
)
32 Single_malt_grouping_item::my_width () const
34 Paper_column
* pc
= column_l ();
36 for (int i
=0; i
< item_l_arr_
.size (); i
++)
38 Item
*il
= item_l_arr_
[i
];
39 if (pc
!= il
->column_l ())
41 /* this shouldn't happen, but let's continue anyway. */
42 programming_error (_("Single_malt_grouping_item: I've been drinking too much"));
46 Interval
iv (il
->extent (X_AXIS
));
49 Real off
= il
->relative_coordinate (pc
->dim_cache_
[X_AXIS
], X_AXIS
);
55 // add this->offset_ ? this-> relative_coordinate ()?
61 Single_malt_grouping_item::do_substitute_element_pointer (Score_element
*o
,
64 if (dynamic_cast <Item
*> (o
))
66 item_l_arr_
.unordered_substitute (dynamic_cast <Item
*> (o
),
67 dynamic_cast <Item
*> (n
));
72 Single_malt_grouping_item::do_print () const
75 for (int i
=0; i
< item_l_arr_
.size (); i
++)
77 DOUT
<< classname (item_l_arr_
[i
]) << ", ";