在Lisp程序中退出程序，可以使用以下方法：
使用`quit`或`exit`命令
在Lisp的交互式环境中，输入`（quit）`或`（exit）`并回车即可退出程序。
使用`return`语句
在函数内部，可以使用`return`语句提前返回，从而退出函数。例如：
```lisp
（defun example-function （）
（format t "Before return.~%"）
（return-from example-function 42））
```
调用`example-function`函数后，会打印"Before return."，然后立即退出并返回值42。
使用`exit`命令
在某些情况下，也可以使用`exit`命令来退出Lisp进程。例如，在命令行中启动Lisp时，可以使用`（exit）`命令来退出程序。
建议根据具体的使用场景和需求选择合适的方法来退出Lisp程序。在交互式环境中，使用`quit`或`exit`命令比较方便；在函数内部，使用`return`语句可以更精确地控制程序的退出和返回值。