肝心なところなのでわるいけど突っ込んじゃう。
quoteした結果「文字としてあつかわれる」んじゃなくて「評価されない」では。

(characterp (car '(+ 2 2)))
nil
(symbolp (car '(+ 2 2)))
t
(stringp (car '(+ 2 2)))
nil
(functionp (car '(+ 2 2)))
t
(listp (car '(+ 2 2)))
nil
(atom (car '(+ 2 2)))
t