]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/source.cc
* lily/smobs.cc (protect_smob): switch off fancy smob protection
[lilypond.git] / lily / source.cc
index 002768038c0069a8b33fd2f649dfc35c72655a24..9d978d4fae93d9b5e20e8b86fed9f6daa7b331ba 100644 (file)
@@ -58,7 +58,10 @@ Sources::add (Source_file *sourcefile)
 
 Sources::~Sources ()
 {
-  junk_pointers (sourcefiles_);
+  for (vsize i = 0; i < sourcefiles_.size (); i++)
+    {
+      sourcefiles_[i]->unprotect ();
+    }
 }
 
 Source_file *