multiple-value-prog1.lsp 1.95 KB