/[guile]/guile/guile-core/libguile/gh_data.c
ViewVC logotype

Diff of /guile/guile-core/libguile/gh_data.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.65 by mvo, Sun Nov 25 15:21:07 2001 UTC revision 1.66 by ossau, Sat Dec 1 15:54:58 2001 UTC
# Line 701  gh_module_lookup (SCM module, const char Line 701  gh_module_lookup (SCM module, const char
701    
702    SCM_VALIDATE_MODULE (SCM_ARG1, module);    SCM_VALIDATE_MODULE (SCM_ARG1, module);
703    
704    sym = gh_symbol2scm (sname);    sym = scm_str2symbol (sname);
705    var = scm_sym2var (sym, scm_module_lookup_closure (module), SCM_BOOL_F);    var = scm_sym2var (sym, scm_module_lookup_closure (module), SCM_BOOL_F);
706    if (var != SCM_BOOL_F)    if (var != SCM_BOOL_F)
707      return SCM_VARIABLE_REF (var);      return SCM_VARIABLE_REF (var);

Legend:
Removed from v.1.65  
changed lines
  Added in v.1.66

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26