X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fspring-smob.cc;h=7eb382074587f04bfb27c29970a63252e648e19d;hb=f5e81dd9ca9e3621709898e6518ab7295377ac7c;hp=fcdd84794f1ec62b634de60537a5eda33f104f6c;hpb=e24df7c27635dc996c466295eacf2981bddccaf7;p=lilypond.git diff --git a/lily/spring-smob.cc b/lily/spring-smob.cc index fcdd84794f..7eb3820745 100644 --- a/lily/spring-smob.cc +++ b/lily/spring-smob.cc @@ -1,11 +1,10 @@ -/* - spring.cc -- implement Spring - +/* + spring.cc -- implement Spring + source file of the GNU LilyPond music typesetter - + (c) 1999--2005 Han-Wen Nienhuys - - */ +*/ #include "spring.hh" #include "warn.hh" @@ -14,12 +13,11 @@ Spring_smob::Spring_smob () { distance_ = 0.; - strength_ =1.0; + strength_ = 1.0; expand_only_b_ = false; other_ = 0; } - IMPLEMENT_SIMPLE_SMOBS (Spring_smob); SCM @@ -33,7 +31,7 @@ Spring_smob::print_smob (SCM, SCM p, scm_print_state *) } SCM -Spring_smob::equal_p (SCM a , SCM b) +Spring_smob::equal_p (SCM a, SCM b) { return a == b? SCM_BOOL_T : SCM_BOOL_F; }