# This script is intended as main script for packnl embedding, it
# dispatches to the command of the first argument.

(load "siteconfig.lsp")

(if (exists file? (list (main-args 1)
                        (string (main-args 1) ".lsp")))
    (load $it)
  (write-line 2 (string "Unknown command " (main-args 1))))
(exit 0)