Object <- MemoryDevice <- BuiltInStorage |
|
|
AnnounceOutOfMemory AttemptMemoryRecoveryIn HandlePendingLowOnMemory HandlePendingOutOfMemory PreflightAnnouncement |
|
Image TotalFreeBytes TotalSize WriteProtected |
| Field | Type | |
|---|---|---|
| ContainerDevice: | shelf: | Viewable |
| containsNewObjects: | Boolean | |
| writeable: | Boolean | |
| HasDate: | dateCreated: | Signed |
| timeCreated: | Unsigned | |
| dateModified: | Signed | |
| timeModified: | Unsigned | |
| MemoryDevice: | volumeRosterAddress: | Pointer |
instance BuiltInStorage tag; shelf: nilObject; containsNewObjects: false; writeable: false; dateCreated: 0; timeCreated: 0; dateModified: 0; timeModified: 0; volumeRosterAddress: nil; end instance;
#endif Define Class BuiltInStorage; inherits from MemoryDevice; // free memory values overrides TotalFreeBytes, TotalSize; // low and out of memory handling overrides HandlePendingOutOfMemory, HandlePendingLowOnMemory; overrides AttemptMemoryRecoveryIn; overrides AnnounceOutOfMemory; overrides Image; overrides WriteProtected; overrides PreflightAnnouncement; end class;