Documentation
Classes of metaclass PERSISTENT-CLASS automatically
inherit from this class.
Slots
- OBJECT-ID
- TRANSACTION-ID
- RUCKSACK
Hierachy
Precedence List
Sub Classes
Source
(defclass persistent-object ()
((object-id :initarg :object-id :reader object-id
:persistence nil :index nil)
(transaction-id :reader transaction-id :persistence nil :index nil)
(rucksack :initarg :rucksack :reader rucksack :persistence nil :index nil))
(:default-initargs
:rucksack *rucksack*)
(:metaclass persistent-class)
(:index nil)
(:documentation "Classes of metaclass PERSISTENT-CLASS automatically
inherit from this class."))
Source Context