]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/object-key-dumper-scheme.cc
(framework_relocation): use INSTALLER_PREFIX.
[lilypond.git] / lily / object-key-dumper-scheme.cc
index 3a3d77575c04a1e3b0e2c24875da6d788f8e7e03..bdcfff4d3369b8910c8fe362652e5755f05ce3ae 100644 (file)
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  (c) 2005--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
 */
 
 #include "object-key-dumper.hh"
@@ -16,9 +16,7 @@ LY_DEFINE (ly_make_dumper, "ly:make-dumper",
           "Create a key dumper. ")
 {
   Object_key_dumper *u = new Object_key_dumper ();
-  SCM x = u->self_scm ();
-  scm_gc_unprotect_object (x);
-  return x;
+  return u->unprotect ();
 }
 
 LY_DEFINE (ly_dumper_definitions, "ly:dumper-definitions",