X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fscm-hash.cc;h=13c6ba0d5c2ca86088f28c1bfe790ad9d68cceb0;hb=664070d837cc4855091455892cb942cdcedeef0c;hp=7542b121d1dd8a8a0b3c9411f8ed8c6cdb2868dd;hpb=ba858880848d6aca1de4401d185860eb2017a01c;p=lilypond.git

diff --git a/lily/scm-hash.cc b/lily/scm-hash.cc
index 7542b121d1..13c6ba0d5c 100644
--- a/lily/scm-hash.cc
+++ b/lily/scm-hash.cc
@@ -101,7 +101,7 @@ Scheme_hash_table::contains (SCM k) const
 void
 Scheme_hash_table::set (SCM k, SCM v)
 {
-  assert (is_symbol (k));
+  assert (ly_c_symbol_p (k));
   SCM handle = scm_hashq_create_handle_x (hash_tab_, k, SCM_UNDEFINED);
   if (ly_cdr (handle) == SCM_UNDEFINED)
     {