forked from KolibriOS/kolibrios
Replace ABOVE? and BELOW? with analogues
git-svn-id: svn://kolibrios.org@7316 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
parent
8924de4eb3
commit
dcb4bb8624
@ -236,14 +236,14 @@ Waiting Proc
|
||||
fld Instant
|
||||
fcomip st(0), st(1)
|
||||
fstp st(0)
|
||||
.If ABOVE?
|
||||
.If !CARRY? && !ZERO?
|
||||
inc SleepTime
|
||||
.Else
|
||||
fld Float_40
|
||||
fld Instant
|
||||
fcomip st(0), st(1)
|
||||
fstp st(0)
|
||||
.If BELOW? && (SleepTime != 0)
|
||||
.If CARRY? && (SleepTime != 0)
|
||||
dec SleepTime
|
||||
.EndIf
|
||||
.EndIf
|
||||
|
Loading…
Reference in New Issue
Block a user