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

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

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

revision 1.48 by mvo, Tue Nov 6 12:53:22 2001 UTC revision 1.49 by ossau, Tue Jan 22 23:31:39 2002 UTC
# Line 515  scm_compile_shell_switches (int argc, ch Line 515  scm_compile_shell_switches (int argc, ch
515        else if (! strcmp (argv[i], "-e")) /* entry point */        else if (! strcmp (argv[i], "-e")) /* entry point */
516          {          {
517            if (++i < argc)            if (++i < argc)
518              entry_point = gh_symbol2scm (argv[i]);              entry_point = scm_str2symbol (argv[i]);
519            else            else
520              scm_shell_usage (1, "missing argument to `-e' switch");              scm_shell_usage (1, "missing argument to `-e' switch");
521          }          }

Legend:
Removed from v.1.48  
changed lines
  Added in v.1.49

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