在加载时运行Lisp函数

Question

每当我（使用以下代码加载“program.lisp”）时，我都会收到错误：“错误：#input stream的意外结束”program.lisp“

(defun theProgram () 
    (reset)
    (print "Hello Kappa")
    (setentries)
    (startloop)
    (loop for x in mylist collect (splitremove))
    (loop for x in numlist collect (getgrades))
    (loop for x in namelist collect (getprint))
    (loop for x in printlist collect (andprint)))
(theProgram)

我知道最后一行是问题，如果没有包含它会正常工作但是我需要程序在加载时启动，我该如何实现？

编辑：我应该注意，setentries调用（读取），startloop也是如此。我正在使用GNU常见的lisp 2.6和gcl解释器。

Answer 1

实际错误是函数中的（读取）部分没有声明流，因此它在脚本运行时而不是从终端读取输入。