]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/drum-note-performer.cc
Replace C++ (in)equality checks with proper SCM syntax
[lilypond.git] / lily / drum-note-performer.cc
index 6c565cd8e050623b31ef925b408a1422058314d4..4b74f791cfaffbaaa10e3e234cdabb624c646b56 100644 (file)
@@ -55,7 +55,7 @@ Drum_note_performer::process_music ()
       SCM defn = SCM_EOL;
 
       if (scm_is_symbol (sym)
-          && (scm_hash_table_p (tab) == SCM_BOOL_T))
+          && to_boolean (scm_hash_table_p (tab)))
         defn = scm_hashq_ref (tab, sym, SCM_EOL);
 
       if (Pitch *pit = Pitch::unsmob (defn))