The ~P format directive can do simple pluralization.
* (format nil "You have ~D goat~:P." 42) "You have 42 goats." * (format nil "You have ~D goat~:P." 1) "You have 1 goat."
Введение в HandlerSocket: описание протокола и расширения php-handlersocket | Токарчук Андрей
Common Lisp Tips: string output streams -
get-output-stream-string doesn’t just return the string accumulated so far in a string-stream. It also resets the accumulation, so you can use the same stream multiple times for separate results. Here’s a simple string splitter:
(defun split (string &optional (split-character #\Space)) (let...