spiral demo: Replace P6 fcomip instruction with pre-P6 ones.

git-svn-id: svn://kolibrios.org@7665 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Ivan Baravy 2019-06-04 01:04:46 +00:00
parent 8a54de90d7
commit 13388e2db3

View File

@ -285,16 +285,18 @@ endp
proc waiting proc waiting
fld [max_frame_rate] fld [max_frame_rate]
fld [instant] fld [instant]
fcomip st1 fcompp
fstp st0 fstsw ax
jna @f sahf
jc @f
inc [sleep_time] inc [sleep_time]
jmp .end jmp .end
@@: @@:
fld [min_frame_rate] fld [min_frame_rate]
fld [instant] fld [instant]
fcomip st1 fcompp
fstp st0 fstsw ax
sahf
jnc .end jnc .end
cmp [sleep_time], 0 cmp [sleep_time], 0
jz .end jz .end