it's a shortcut to quote

Yep.

My comment was about implementing one's own Lisp reader.

    (define *reader-macros* `(
      (#\' ,(lambda () (list 'quote (read))))))

instead of

    (case dispatch-char
      ((#\') (list 'quote (read)))
      ...)