updated script

This commit is contained in:
Chad Nelson 2025-02-27 16:55:52 -07:00
parent 567b9e56f3
commit da9170e372
3 changed files with 2 additions and 24 deletions
scripts

View file

@ -1,24 +0,0 @@
#!/opt/homebrew/bin/guile \
-e main -s
!#
(use-modules (msg machine)
(msg shell)
(ice-9 match))
(define* (main #:optional (args (command-line)))
(define clean-args (cdr args))
(match clean-args
(("machine" rest ...)
(machine rest))
(("shell" rest ...)
(shell))
(("-h")
(help))
(_
(display "Please enter a valid command or -h for help.\n"))))
(define* (help)
(display "\nHere are the available commands:\n\n")
(display "machine: interact with the vm environment for MSG.\n"))