]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/spring-smob.cc
* Documentation/user/notation.itely (Bar lines): Added a note that
[lilypond.git] / lily / spring-smob.cc
index 502fc13f713e46334e53bc98076abbb8727f86ac..e27a72e93db50dcb3e19431b7f2f73bba34bdd1a 100644 (file)
@@ -28,8 +28,7 @@ Spring_smob::mark_smob (SCM) { return SCM_UNSPECIFIED; }
 int
 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_).to_str0 (), p);
+  scm_puts ("#<Spring smob>", p);
   return 1;
 }
 
@@ -39,9 +38,3 @@ Spring_smob::equal_p (SCM a , SCM b)
   return a==b? SCM_BOOL_T : SCM_BOOL_F;
 }
 
-SCM
-Spring_smob::smobbed_copy ()const
-{
-  Spring_smob *  p = new Spring_smob (*this);
-  return p->smobbed_self ();
-}