Lisp -- How to add several hexadecimal numbers without base conversion?

Question

Ii would like to know how to add several hexadecimal numbers in lisp without first converting them to another base. How could this be done?

Answer 1

Common Lisp:

> (setf *print-base* 16)

> (setf *read-base* 16)

> (+ a d)
17