Functions for adding accessor methods that call SLOT-VALUE and (SETF SLOT-VALUE).