Object <- Actor <- MagicBusActor |
|
|
Main SwitchingStateChanged |
Class MagicBusActor defines no new attributes.
Fields
| 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 |
instance MagicBusActor 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;
end instance;
#endif
Define Class MagicBusActor;
inherits from Actor;
overrides Main;
overrides SwitchingStateChanged;
// Shutdown or Restart MagicBus when switching is disabled
end class;