(defun hello-world ()
  (format t "hello, world~%"))
(hello-world)