Print "Hello World" to the *standard-output* without using integer, string and character literals in Common Lisp.

hello-world.lisp

;; This is a answer for a question of CodeIQ.
;; https://codeiq.jp/ace/cielavenir/q431

(in-package :cl-user)

(defmacro print-capitalized (symbol &rest symbols)
  `(progn
     (princ ,(string-capitalize symbol))
     ,@(loop for s in symbols
             collect `(princ ,(name-char 'space))
             collect `(princ ,(string-capitalize s)))))

(print-capitalized hello world)
;-> Hello World