#endif
-#ifdef CACHE_SYMBOLS
-
-
/*
We don't use gh_symbol2scm directly, since it has const-correctness
problems in GUILE 1.3.4
*/
SCM my_gh_symbol2scm (const char* x);
+#ifdef CACHE_SYMBOLS
+
+
/*
Using this trick we cache the value of gh_symbol2scm ("fooo") where
"fooo" is a constant string. This is done at the cost of one static
value = gh_symbol2scm ((char*) (x)); \
value; })
#else
-inline SCM ly_symbol2scm(char const* x) { return gh_symbol2scm((x)); }
+inline SCM ly_symbol2scm(char const* x) { return my_gh_symbol2scm((x)); }
#endif