]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/include/ly-smobs.icc
release: 1.3.6
[lilypond.git] / lily / include / ly-smobs.icc
index 2bb82ae41bf1a6da07a2637b3e515549c47302c1..3ee8d6db515e231b4d67a963257dbb18213909fe 100644 (file)
@@ -54,6 +54,7 @@ CL::smobify_self ()                                                   \
   SCM_SETCDR(s,me_p);                                                  \
   scm_protect_object (s);                                              \
                                                                        \
+/* no scm_done_malloc() !  */ \
   do_smobify_self();                                                   \
   return s;                                    \
 }                                              \
@@ -66,7 +67,7 @@ CL::free_smob (SCM ses)                               \
      return 0; \
   SCM_CAR(ses) = SCM_EOL;\
                                        \
-  return sizeof(CL);                           \
+  return 0;\
 }                                              \
 ADD_SCM_INIT_FUNC(CL, CL::init_smobs)\