Permalink
Switch branches/tags
Nothing to show
Find file
Fetching contributors…
Cannot retrieve contributors at this time
6 lines (4 sloc) 138 Bytes
(in-package :academy)
(defun war ()
"Global Thermonuclear War"
(format t "A strange game. The only winning move is not to play.~%"))