Changeset 13415


Ignore:
Timestamp:
Jan 28, 2010, 8:58:08 PM (10 years ago)
Author:
gb
Message:

Arggh. Another hardwired 1000 in %TIMED-WAIT-ON-SEMAPHORE-PTR.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-1/linux-files.lisp

    r13414 r13415  
    150150                  (let* ((diff (- stop now)))
    151151                    (multiple-value-bind (remaining-seconds remaining-millis)
    152                         (floor diff 1000)
     152                        (floor diff internal-time-units-per-second)
    153153                      (setq secs remaining-seconds
    154154                            millis remaining-millis)))))))))))
Note: See TracChangeset for help on using the changeset viewer.