Changeset 10823


Ignore:
Timestamp:
Sep 22, 2008, 3:08:34 PM (11 years ago)
Author:
gb
Message:

Use #_SleepEx in HOUSEKEEPING-LOOP on Windows.
Todo: handle premature timeout due to interrupt/APC delivery.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-1/l1-application.lisp

    r10703 r10823  
    295295  (with-standard-abort-handling nil
    296296    (loop
    297       #+windows-target
    298       (#_Sleep 333)
    299       #-windows-target
    300       (%nanosleep *periodic-task-seconds* *periodic-task-nanoseconds*)
     297      #+windows-target (#_SleepEx 333 #$true)
     298      #-windows-target (%nanosleep *periodic-task-seconds* *periodic-task-nanoseconds*)
    301299      (housekeeping))))
    302300 
Note: See TracChangeset for help on using the changeset viewer.