From: David Kastrup <dak@gnu.org>
Date: Mon, 6 Oct 2014 16:44:28 +0000 (+0200)
Subject: Bitrot fix in outcommented Grob_array::mark_smob code
X-Git-Tag: release/2.19.16-1~24
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=b9568aa53309aa18ae0fa7c83bf0c29557772183;p=lilypond.git

Bitrot fix in outcommented Grob_array::mark_smob code

Just in case we need to resuscitate that code, it would be nice if it
were actually correct.  This is an afterthought of issue 4135.
---

diff --git a/lily/grob-array.cc b/lily/grob-array.cc
index f1f47561e3..908ff6334b 100644
--- a/lily/grob-array.cc
+++ b/lily/grob-array.cc
@@ -55,9 +55,8 @@ SCM
 Grob_array::mark_smob ()
 {
 #if 0  /* see System::derived_mark () const */
-  Grob_array *ga = Grob_array::unsmob (s);
-  for (vsize i = 0; i < ga->grobs_.size (); i++)
-    scm_gc_mark (ga->grobs_[i]->self_scm ());
+  for (vsize i = 0; i < grobs_.size (); i++)
+    scm_gc_mark (grobs_[i]->self_scm ());
 #endif
   return SCM_UNDEFINED;
 }