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
|
fld Instant
|
||||||
fcomip st(0), st(1)
|
fcomip st(0), st(1)
|
||||||
fstp st(0)
|
fstp st(0)
|
||||||
.If ABOVE?
|
.If !CARRY? && !ZERO?
|
||||||
inc SleepTime
|
inc SleepTime
|
||||||
.Else
|
.Else
|
||||||
fld Float_40
|
fld Float_40
|
||||||
fld Instant
|
fld Instant
|
||||||
fcomip st(0), st(1)
|
fcomip st(0), st(1)
|
||||||
fstp st(0)
|
fstp st(0)
|
||||||
.If BELOW? && (SleepTime != 0)
|
.If CARRY? && (SleepTime != 0)
|
||||||
dec SleepTime
|
dec SleepTime
|
||||||
.EndIf
|
.EndIf
|
||||||
.EndIf
|
.EndIf
|
||||||
|
Loading…
Reference in New Issue
Block a user