]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/scm-hash.cc
Run `make grand-replace'.
[lilypond.git] / lily / scm-hash.cc
index bc99c8d35047f0951835b836286e92306f9a8932..ed3345b5acff86c055ef72b404c48e4be8f4c4a9 100644 (file)
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 1999--2007 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  (c) 1999--2008 Han-Wen Nienhuys <hanwen@xs4all.nl>
 */
 
 #include "scm-hash.hh"
@@ -28,7 +28,7 @@ copy_handle (void *closure, SCM handle)
 static void
 copy_scm_hashes (SCM dest, SCM src)
 {
-  scm_internal_hash_for_each_handle (  (SCM (*)()) &copy_handle, dest, src);
+  scm_internal_hash_for_each_handle (  (SCM (*)(GUILE_ELLIPSIS)) &copy_handle, dest, src);
 }
 
 Scheme_hash_table::Scheme_hash_table ()
@@ -129,7 +129,7 @@ collect_handles (void *closure, SCM key, SCM value, SCM result)
 SCM
 Scheme_hash_table::to_alist () const
 {
-  return scm_internal_hash_fold ((SCM (*)()) &collect_handles, NULL, SCM_EOL, hash_tab_);
+  return scm_internal_hash_fold ((SCM (*)(GUILE_ELLIPSIS)) &collect_handles, NULL, SCM_EOL, hash_tab_);
 }
 
 IMPLEMENT_SMOBS (Scheme_hash_table);