1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-18 01:30:27 +02:00

1999-10-26 Mark Galassi <rosalia@lanl.gov>

* gh.h, gh_data.c (gh_symbol2scm): changed gh_symbol2scm() to take
	a const char * argument, upon suggestion from Lynn Winebarger.
This commit is contained in:
Mark Galassi 1999-10-26 19:38:05 +00:00
parent cd19d608b1
commit 4921140c64
3 changed files with 7 additions and 2 deletions

View file

@ -120,7 +120,7 @@ gh_set_substr (char *src, SCM dst, int start, int len)
/* Return the symbol named SYMBOL_STR. */
SCM
gh_symbol2scm (char *symbol_str)
gh_symbol2scm (const char *symbol_str)
{
return SCM_CAR (scm_intern (symbol_str, strlen (symbol_str)));
}