1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-11 06:20:23 +02:00

* gh_data.c (gh_module_lookup): Use scm_str2symbol rather than gh_symbol2scm.

This commit is contained in:
Neil Jerram 2001-12-01 15:54:58 +00:00
parent 2a946b44f4
commit 98347362c7
2 changed files with 6 additions and 1 deletions

View file

@ -1,3 +1,8 @@
2001-12-01 Neil Jerram <neil@ossau.uklinux.net>
* gh_data.c (gh_module_lookup): Use scm_str2symbol rather than
gh_symbol2scm.
2001-11-28 Dirk Herrmann <D.Herrmann@tu-bs.de>
* gc.h (SCM_GC_CELL_WORD, SCM_GC_CELL_OBJECT,

View file

@ -701,7 +701,7 @@ gh_module_lookup (SCM module, const char *sname)
SCM_VALIDATE_MODULE (SCM_ARG1, module);
sym = gh_symbol2scm (sname);
sym = scm_str2symbol (sname);
var = scm_sym2var (sym, scm_module_lookup_closure (module), SCM_BOOL_F);
if (var != SCM_BOOL_F)
return SCM_VARIABLE_REF (var);