source file of the GNU LilyPond music typesetter
- (c) 1997--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+ (c) 1997--2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
*/
#include <math.h>
expr_ = scm_list_n (ly_symbol2scm ("translate-molecule"),
ly_offset2scm (o),
expr_, SCM_UNDEFINED);
- if (!empty_b ())
+ if (!is_empty ())
dim_.translate (o);
}
void
Molecule::align_to (Axis a, Real x)
{
- if (empty_b())
+ if (is_empty ())
return ;
Interval i (extent (a));
Molecule::add_at_edge (Axis a, Direction d, Molecule const &m, Real padding,
Real minimum)
{
- Real my_extent= empty_b () ? 0.0 : dim_[a][d];
+ Real my_extent= is_empty () ? 0.0 : dim_[a][d];
Interval i (m.extent (a));
Real his_extent;
- if (i.empty_b ())
+ if (i.is_empty ())
{
programming_error ("Molecule::add_at_edge: adding empty molecule.");
his_extent = 0.0;
while expr_ == '()
*/
bool
-Molecule::empty_b () const
+Molecule::is_empty () const
{
return expr_ == SCM_EOL;
}
Molecule::print_smob (SCM , SCM port, scm_print_state *)
{
scm_puts ("#<Molecule ", port);
-#if 0
- Molecule *r = (Molecule *) ly_cdr (s);
- String string (r->to_string ());
- scm_puts ((char *)str.to_str0 (), port);
-#endif
scm_puts (" >", port);
return 1;