- if (iface == SCM_BOOL_F)
- {
- string msg = to_string (_f ("Unknown interface `%s'",
- ly_symbol2string (scm_car (ifs)).c_str ()));
- programming_error (msg);
- continue;
- }
+ if (scm_is_false (iface))
+ {
+ string msg = to_string (_f ("Unknown interface `%s'",
+ ly_symbol2string (scm_car (ifs)).c_str ()));
+ programming_error (msg);
+ continue;
+ }