HOUSE

(SETF HOUSE.ID)

((SETF HOUSE.ID) (OBJ HOUSE)) [accessor]

HOUSE.ID

(HOUSE.ID (OBJ HOUSE)) [accessor]

Called By

ESTABLISH-HOUSE&

(SETF HOUSE.ITEMS)

((SETF HOUSE.ITEMS) (OBJ HOUSE)) [accessor]

Called By

DEFINE-HOUSE and DEFINE-STORE

HOUSE.ITEMS

(HOUSE.ITEMS (OBJ HOUSE)) [accessor]

Called By

%HOME-INPUT-LOOP, DISPLAY-HOUSE, FILED-VARIANT-DATA, SAVE-OBJECT and SAVE-OBJECT

(SETF HOUSE.NAME)

((SETF HOUSE.NAME) (OBJ HOUSE)) [accessor]

HOUSE.NAME

(HOUSE.NAME (OBJ HOUSE)) [accessor]

(SETF HOUSE.OWNER)

((SETF HOUSE.OWNER) (OBJ HOUSE)) [accessor]

HOUSE.OWNER

(HOUSE.OWNER (OBJ HOUSE)) [accessor]

Called By

ACCEPTABLE-OWNER?