]> git.donarmstrong.com Git - lilypond.git/commitdiff
(ly_add_function_documentation):
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Wed, 18 May 2005 13:35:17 +0000 (13:35 +0000)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Wed, 18 May 2005 13:35:17 +0000 (13:35 +0000)
use scm_hash_table_p() for checking.

lily/function-documentation.cc

index bfa68ec5465c33fbd0e54ffcc75480c9c557a36e..8ea300dab31df46252e1f0d31aaaaabcf3d96163 100644 (file)
@@ -21,7 +21,7 @@ void ly_add_function_documentation (SCM func,
   if (!strlen (doc))
     return;
 
-  if (!scm_is_vector (doc_hash_table))
+  if (scm_hash_table_p (doc_hash_table) == SCM_BOOL_T)
     doc_hash_table = scm_c_make_hash_table (59);
 
   String s = String (" - ") + "LilyPond procedure: " + fname + " " + varlist