2 # This script is intended as main script for packnl embedding, it
3 # dispatches to the command of the first argument.
5 (if (exists file? (list (main-args 1)
6 (string (main-args 1) ".lsp")))
8 (write-line 2 (string "Unknown command " (main-args 1))))