diff options
Diffstat (limited to 'module/srfi/srfi-37.scm')
-rw-r--r-- | module/srfi/srfi-37.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/module/srfi/srfi-37.scm b/module/srfi/srfi-37.scm index 9b57ac1c2..cd37f981e 100644 --- a/module/srfi/srfi-37.scm +++ b/module/srfi/srfi-37.scm @@ -31,9 +31,9 @@ ;; (display-and-exit-proc "Foo version 42.0\n")) ;; (option '(#\h "help") #f #f ;; (display-and-exit-proc -;; "Usage: foo scheme-file ...")))) +;; "Usage: foo scheme-file ...\n")))) ;; (lambda (opt name arg) -;; (error "Unrecognized option `~A'" name)) +;; (error (format #f "Unrecognized option `~A'" name))) ;; (lambda (op) (load op) (values))) ;; ;;; Code: |