source file of the GNU LilyPond music typesetter
- (c) 1999--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+ (c) 1999--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
*/
#include "spring.hh"
-#include "debug.hh"
+#include "warn.hh"
#include "ly-smobs.icc"
Spring_smob::Spring_smob()
{
- distance_f_ =0.;
- strength_f_ =1.0;
+ distance_ =0.;
+ strength_ =1.0;
expand_only_b_ = false;
other_ = 0;
}
Spring_smob::print_smob (SCM s, SCM p, scm_print_state *)
{
Spring_smob *ss = unsmob_spring (s);
- scm_puts (_f("#<spring smob d= %f>", ss->distance_f_).ch_C(), p);
+ scm_puts (_f("#<spring smob d= %f>", ss->distance_).to_str0 (), p);
return 1;
}