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:
parent
cd19d608b1
commit
4921140c64
3 changed files with 7 additions and 2 deletions
|
@ -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)));
|
||||
}
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue