(defun main (&rest args)oop
(defun factorial (n)ui
(if (= n 0)spa
1rest
(* n (factorial (- n 1))) ) )it
(loop for i in *args* do (write (factorial (parse-integer i)))變量
(terpri))cli
(write "Hello World!")配置
(quit))lisp
(EXT:SAVEINITMEM "main"環境變量
:QUIET t
:INIT-FUNCTION 'main
:EXECUTABLE t
:NORC t)
保存在文件main.lisp裏面,而後運行命令
$ clisp main.lisp
運行main.exe會報錯:libreadline6.dll找不到。
這個文件在clisp的base目錄中,須要把這個目錄配置到環境變量中,再次運行就能夠了。