testing
This commit is contained in:
parent
1acec34e71
commit
30c19ec41d
1 changed files with 3 additions and 3 deletions
|
@ -2,7 +2,7 @@
|
||||||
--no-auto-compile -e main -s
|
--no-auto-compile -e main -s
|
||||||
!#
|
!#
|
||||||
|
|
||||||
(use-modules ;;(msg machine2)
|
(use-modules (msg machine)
|
||||||
(msg shell)
|
(msg shell)
|
||||||
(ice-9 match))
|
(ice-9 match))
|
||||||
|
|
||||||
|
@ -10,8 +10,8 @@
|
||||||
(define clean-args (cdr args))
|
(define clean-args (cdr args))
|
||||||
|
|
||||||
(match clean-args
|
(match clean-args
|
||||||
;;(("machine" rest ...)
|
(("machine" rest ...)
|
||||||
;; (machine rest))
|
(machine rest))
|
||||||
(("shell" rest ...)
|
(("shell" rest ...)
|
||||||
(shell))
|
(shell))
|
||||||
(("-h")
|
(("-h")
|
||||||
|
|
Loading…
Add table
Reference in a new issue