Added slot-ref function that is setf'able to access nested slots