2003-09-28 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+ * lily/*.cc: remove #if 0'd code in couple of places.
+
* lily/midi-stream.cc (operator <<): rewrite.
* lily/note-head.cc (internal_brew_molecule):
* most probably arises from an empty voice, such as shared
* global timesig/clef definitions.
*/
-#if 0
- ambitus_->warning("empty ambitus range [ignored]");
-#endif
ambitus_->suicide();
}
}
}
}
-#if 0
- qsort (vec + sp_index, len - sp_index,
- sizeof (Substitution_entry), &Substitution_entry::spanner_compare);
/*
- This is a waste of time -- the staff-spanners screw up the
+ sorting vec[sp_index.. len]
+ is a waste of time -- the staff-spanners screw up the
ordering, since they go across the entire score.
*/
- for (int i = sp_index; i < len ;i++)
- {
-
- for (int j = vec[i].left_; j <= vec[i].right_; j++)
- {
- sp_indices[j - system_range[LEFT]].add_point (i);
- }
- }
-#else
for (int i = sp_indices.size(); i--;)
sp_indices[i]= Slice (sp_index, len-1);
-#endif
assert (it_index <= sp_index);
Molecule
brew_cluster_piece (Grob *me, Array<Offset> bottom_points, Array<Offset> top_points)
{
-#if 0
- Real blotdiameter = me->get_paper ()->get_realvar (ly_symbol2scm ("blotdiameter"));
-#else
Real blotdiameter = Staff_symbol_referencer::staff_space (me)/2;
-#endif
Real padding;
SCM padding_scm = me->get_grob_property ("padding");
Molecule m = fm->find_by_name (ly_scm2string (name));
-#if 0
/*
- should add to calling interface.
+ TODO: make optional argument for default if not found.
+
*/
- if (m.get_expr () != SCM_EOL)
- return m.smobbed_copy ();
- else
- return SCM_BOOL_F;
-#endif
return m.smobbed_copy ();
}
String dep = deps[i];
if (!dependency_prefix_global.empty_b ())
{
-#if 0//thinko?
- if (stat (dep.to_str0 (), &stat_buf) == -1 && errno == ENOENT)
- ; //make emacs happy
-#else
if (dep.index ('/') < 0)
-#endif
dep = dependency_prefix_global + dep;
}
out += " " + dep;
TODO: deprecate the use of \override and \revert for
autoBeamSettings?
+
+ or use a symbol autoBeamSettingS?
*/
return true;
#endif
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;
}
-#if 0
-Moment::operator Rational()
-{
- return main_part_;
-}
-#endif
int
Moment::den () const { return main_part_.den (); }
{
Music_output_def * def = unsmob_music_output_def (s);
scm_puts ("#<Music_output_def ", p);
-#if 0
- scm_write (def->type_name_, p);
-#else
- (void) def;
-#endif
+ (void)def;
scm_puts (">", p);
return 1;
}
*space += correction;
-#if 0
/* there used to be a correction for bar_xextent() here, but
it's unclear what that was good for ?
*/
-#endif
}
{
for (int i = 0; i < phrasing_slur_l_stack_.size (); i++)
{
-#if 0
- typeset_grob (phrasing_slur_l_stack_[i]);
-#else
/*
Let's not typeset unterminated stuff
*/
phrasing_slur_l_stack_[i]->suicide ();
-#endif
}
phrasing_slur_l_stack_.clear ();
{
for (int i = 0; i < slur_stack_.size (); i++)
{
-#if 0
- typeset_grob (slur_stack_[i]);
-#else
/*
Let's not typeset unterminated stuff
*/
slur_stack_[i]->suicide ();
-#endif
}
slur_stack_.clear ();
*/
Rational ratio = d.main_part_ / shortest;
-#if 0
- *expand_only = true;
-#endif
return ((k-1) + double (ratio)) * incr;
}
else
}
while (1);
-
-#if 0
- Real rx = right->relative_coordinate (right->get_parent (X_AXIS), X_AXIS);
- Real lx = left->relative_coordinate (left->get_parent (X_AXIS), X_AXIS);
-
- /*
- divide space equally over loose columns.
- */
- int j = 1;
- loose = col;
- while (1)
- {
- SCM between = loose->get_grob_property ("between-cols");
- if (!gh_pair_p (between))
- break;
-
- Paper_column *thiscol = dynamic_cast<Paper_column*> (loose);
-
- thiscol->system_ = which;
- thiscol->translate_axis (lx + j*(rx - lx)/divide_over, X_AXIS);
-
- j ++;
- loose = dynamic_cast<Item*> (unsmob_grob (ly_cdr (between)));
- }
-#else
/*
We divide the remaining space of the column over the left and
right side. At the moment, we
col->system_ = which;
col->translate_axis (lx + dx - cval[LEFT], X_AXIS);
-#endif
}
}
current_req_ = req_drul_[START];
span_ = new Spanner (get_property ("TextSpanner"));
-#if 0
- /* Ugh. Reset (de)cresc. specific properties */
- span_->set_grob_property ("enclose-bounds", SCM_BOOL_T);
- span_->set_grob_property ("if-text-padding", gh_double2scm (0));
- span_->set_grob_property ("width-correct", gh_double2scm (0));
-#endif
Side_position_interface::set_axis (span_, Y_AXIS);
announce_grob (span_, req_drul_[START]->self_scm());