mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-10 05:50:26 +02:00
Code Activity

-x error message fix

Browse source 
* module/ice-9/command-line.scm (compile-shell-switches): Fix error
  message for -x switch.
This commit is contained in:
Andy Wingo 2011-04-28 21:45:02 +02:00
parent dac9812a2e
commit e6efefad08
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
module/ice-9/command-line.scm
View file

@ -247,7 +247,7 @@ If FILE begins with `-' the -s switch is mandatory.
((string=? arg "-x") ; add to %load-extensions ((string=? arg "-x") ; add to %load-extensions
(if (null? args) (if (null? args)
(error "missing argument to `-L' switch")) (error "missing argument to `-x' switch"))
(set! user-extensions (cons (car args) user-extensions)) (set! user-extensions (cons (car args) user-extensions))
(parse (cdr args) (parse (cdr args)
out)) out))