source file of the GNU LilyPond music typesetter
- (c) 1996--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+ (c) 1996--2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
*/
#include "input-smob.hh"
#include "string.hh"
#include "warn.hh"
#include "dimensions.hh"
-#include "molecule.hh"
+#include "stencil.hh"
#include "all-font-metrics.hh"
#include "spacing-interface.hh"
#include "staff-symbol-referencer.hh"
programming_error ("Adding element twice.");
elem->pscore_ = pscore_;
- Pointer_group_interface::add_grob (this, ly_symbol2scm ("all-elements"),elem);
+ Pointer_group_interface::add_grob (this, ly_symbol2scm ("all-elements"), elem);
scm_gc_unprotect_object (elem->self_scm ());
}
}
void
-System::output_molecule (SCM expr, Offset o)
+System::output_stencil (SCM expr, Offset o)
{
while (1)
{
pscore_->outputter_->output_scheme (scm_list_n (head, SCM_UNDEFINED));
expr = ly_cadr (expr);
}
- else if (head == ly_symbol2scm ("translate-molecule"))
+ else if (head == ly_symbol2scm ("translate-stencil"))
{
o += ly_scm2offset (ly_cadr (expr));
expr = ly_caddr (expr);
}
- else if (head == ly_symbol2scm ("combine-molecule"))
+ else if (head == ly_symbol2scm ("combine-stencil"))
{
- output_molecule (ly_cadr (expr), o);
+ output_stencil (ly_cadr (expr), o);
expr = ly_caddr (expr);
}
else
}
/*
- generate all molecules to trigger all font loads.
+ generate all stencils to trigger all font loads.
(ugh. This is not very memory efficient.) */
/*
triger font loads first.
- This might seem inefficient, but Molecules are cached per grob
+ This might seem inefficient, but Stencils are cached per grob
anyway.
*/
- this->get_molecule();
+ this->get_stencil();
for (SCM s = all; gh_pair_p (s); s = ly_cdr (s))
{
Grob * g = unsmob_grob (ly_car (s));
- g->get_molecule ();
+ g->get_stencil ();
}
/*
/* Output elements in three layers, 0, 1, 2.
The default layer is 1. */
{
- Molecule *m = this->get_molecule();
+ Stencil *m = this->get_stencil();
if (m)
- output_molecule (m->get_expr (), Offset(0,0));
+ output_stencil (m->get_expr (), Offset(0,0));
}
for (int i = 0; i < 3; i++)
s = ly_cdr (s))
{
Grob *sc = unsmob_grob (ly_car (s));
- Molecule *m = sc->get_molecule ();
+ Stencil *m = sc->get_stencil ();
if (!m)
continue;
o += z;
}
- output_molecule (m->get_expr (), o);
+ output_stencil (m->get_expr (), o);
}
seem empty. We need to retain breakable columns, in case
someone forced a breakpoint.
*/
- if (!bfound || !Paper_column::used_b (acs[i]))
+ if (!bfound || !Paper_column::is_used (acs[i]))
acs.del (i);
}
return acs;