}
void
-Context::internal_set_property (SCM sym, SCM val
#ifndef NDEBUG
- , char const *file, int line, char const *fun
-#endif
- )
+Context::internal_set_property (SCM sym, SCM val, char const *file, int line, char const *fun)
{
if (do_internal_type_checking_global)
assert (type_check_assignment (sym, val, ly_symbol2scm ("translation-type?")));
+#else
+Context::internal_set_property (SCM sym, SCM val)
+{
+#endif
properties_dict ()->set (sym, val);
}