- if (var == ly_symbol2scm ("old-relative-used"))
- {
- return gh_bool2scm (lily_1_8_compatibility_used);
- }
- if (var == ly_symbol2scm ("old-relative"))
- {
- return gh_bool2scm (lily_1_8_relative);
- }
+ SCM o = SCM_UNSPECIFIED;
+
+ if (var == ly_symbol2scm ("safe")) // heavily used; put in front.
+ o = ly_bool2scm (safe_global_b);
+ else if (var == ly_symbol2scm ("old-relative-used"))
+ o = ly_bool2scm (lily_1_8_compatibility_used);
+ else if (var == ly_symbol2scm ("old-relative"))
+ o = ly_bool2scm (lily_1_8_relative);
+ else if (var == ly_symbol2scm ("verbose"))
+ o = ly_bool2scm (verbose_global_b);
+ else if ( var == ly_symbol2scm ("resolution"))
+ o = scm_from_int (preview_resolution_global);