The function object-address
returns the address of the Lisp object object as an integer address. Note that the address of object may change during garbage collection so this integer should be used for debugging purposes only.
LispWorks User Guide and Reference Manual - 13 Feb 2015