Object <- Actor <- IRActor <- IRDaemonActor |
|
|
CanSleep Init InitializeBeam Main Mru Mtu PoweringDown ReleasePowerAndSleep |
|
Active |
| Field | Type | |
|---|---|---|
| Actor: | status: | UnsignedShort |
| priority: | SignedShort | |
| waitingFor: | Semaphore | |
| state: | Pointer | |
| stackSegment: | Pointer | |
| stackSegmentSize: | Unsigned | |
| exceptionStack: | Pointer | |
| exceptionStackPointer: | Unsigned | |
| interruptCheck: | Function | |
| forUser: | Boolean | |
| exception: | Object | |
| exceptionReason: | Unsigned | |
| suspendLevel: | Unsigned | |
| dispatcherTimingBuffer: | Unsigned | |
| IRActor: | listenSap: | UnsignedByte |
| msgSemaphore: | Object | |
| syncSemaphore: | Object | |
| syncMsg: | Pointer | |
| mqHead: | Pointer | |
| mqTail: | Pointer | |
| CanPreventSleep: | dozeCount: | Signed |
| sleepCount: | Signed | |
| IRDaemonActor: | initSemaphore: | Object |
| station: | Pointer |
instance IRDaemonActor tag;
status: 0;
priority: 0;
waitingFor: nilObject;
state: nil;
stackSegment: nil;
stackSegmentSize: 0;
exceptionStack: nil;
exceptionStackPointer: 0;
interruptCheck: nil;
forUser: false;
exception: nilObject;
exceptionReason: 0;
suspendLevel: 0;
dispatcherTimingBuffer: 0;
listenSap: 0;
msgSemaphore: nilObject;
syncSemaphore: nilObject;
syncMsg: nil;
mqHead: nil;
mqTail: nil;
dozeCount: 0;
sleepCount: 0;
initSemaphore: nilObject;
station: nil;
end instance;
Define Class IRDaemonActor;
inherits from IRActor;
inherits from HasReinitialize;
inherits from CanPreventSleep;
inherits from CanPreventReboot;
inherits from WantsPowerEvents;
field initSemaphore: Object;
field station: Pointer;
attribute Active: Boolean, readOnly;
operation Mru(lsapIdx : Unsigned) : Signed;
operation Mtu(lsapIdx : Unsigned) : Signed;
intrinsic InitializeBeam();
overrides Init, Main;
overrides CanSleep, ReleasePowerAndSleep;
overrides PoweringDown;
end class;