diff options
Diffstat (limited to 'windowevent.icl')
| -rw-r--r-- | windowevent.icl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/windowevent.icl b/windowevent.icl index 72f0a30..da02c10 100644 --- a/windowevent.icl +++ b/windowevent.icl @@ -25,8 +25,10 @@ windoweventFatalError function error For the time being no timer controls are added, so these events are ignored.
windowEvent assumes that it is not applied to an empty IOSt.
*/
+import StdMisc
windowEvent :: !SchedulerEvent !(PSt .l) -> (!Bool,!Maybe DeviceEvent,!SchedulerEvent,!PSt .l)
windowEvent schedulerEvent pState
+ //| True = abort "windowevent\n"
# (hasDevice,pState) = accPIO (ioStHasDevice WindowDevice) pState
| not hasDevice // This condition should never occur: WindowDevice must have been 'installed'
= windoweventFatalError "windowFunctions.dEvent" "could not retrieve WindowSystemState from IOSt"
|