/*
This file is part of LilyPond, the GNU music typesetter.
- Copyright (C) 2005--2014 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ Copyright (C) 2005--2015 Han-Wen Nienhuys <hanwen@xs4all.nl>
LilyPond is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
#endif
/*
- TODO: rename me to ly_c_lily_module_eval
-
we don't have to protect the result; it's already part of the
exports list of the module.
*/
if (__builtin_constant_p ((x))) \
{ \
if (!cached) \
- value = cached = scm_eval (scm_from_locale_symbol (x), \
- global_lily_module); \
+ value = cached = \
+ scm_variable_ref (scm_c_module_lookup (global_lily_module, (x))); \
} \
else \
- value = scm_eval (scm_from_locale_symbol (x), global_lily_module); \
+ value = \
+ scm_variable_ref (scm_c_module_lookup (global_lily_module, (x))); \
value; \
})
} \
}
-#define LY_ASSERT_SMOB(klass, var, number) LY_ASSERT_TYPE(klass::unsmob, var, number)
+#define LY_ASSERT_SMOB(klass, var, number) LY_ASSERT_TYPE(klass::is_smob, var, number)
#endif /* LILY_GUILE_MACROS_HH */