summaryrefslogtreecommitdiff
path: root/module/ice-9/command-line.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/ice-9/command-line.scm')
-rw-r--r--module/ice-9/command-line.scm6
1 files changed, 6 insertions, 0 deletions
diff --git a/module/ice-9/command-line.scm b/module/ice-9/command-line.scm
index a74f7e7f8..13dfa0182 100644
--- a/module/ice-9/command-line.scm
+++ b/module/ice-9/command-line.scm
@@ -140,6 +140,8 @@ If FILE begins with `-' the -s switch is mandatory.
which is a list of numbers like \"2,13,14\"
--r6rs change initial Guile environment to better support
R6RS
+ --r7rs change initial Guile environment to better support
+ R7RS
-h, --help display this help and exit
-v, --version display version information and exit
\\ read arguments from following script lines"))
@@ -376,6 +378,10 @@ If FILE begins with `-' the -s switch is mandatory.
(parse args
(cons '(install-r6rs!) out)))
+ ((string=? "--r7rs" arg)
+ (parse args
+ (cons '(install-r7rs!) out)))
+
((string=? arg "--listen") ; start a repl server
(parse args
(cons '((@@ (system repl server) spawn-server)) out)))