Skip to content
hello.lisp 329 B
Newer Older
(defpackage :hello
  (:use :cl :asdf/driver)

(in-package :hello)

(defun main (&rest arguments)
  (format t "hello, world~%")
  (when arguments
    (format t "You passed ~D arguments:~%~{  ~S~%~}" (length arguments) arguments)))

(defun entry-point ()
  (apply 'main *command-line-arguments*))