Mail Archives: djgpp-workers/2003/09/30/16:35:05
--part1_140.19edd57f.2cab4271_boundary
Content-Type: text/plain; charset="US-ASCII"
Content-Transfer-Encoding: 7bit
Esa Peuha:
Your code passed all tests in the test suite. Congratulations and thanks.
KB Williams
In a message dated 9/30/2003 3:03:45 PM Eastern Standard Time,
peuha AT cc DOT helsinki DOT fi writes:
> /* Copyright (C) 1994 DJ Delorie, see COPYING.DJ for details */
> .text
> .globl ___modfl
> ___modfl:
> pushl %ebp
> movl %esp,%ebp
> subl $4,%esp
> fldt 8(%ebp)
> movl 20(%ebp),%eax
> fnstcw -2(%ebp)
> movw -2(%ebp),%dx
> orb $0x0c,%dh
> movw %dx,-4(%ebp)
> fldcw -4(%ebp)
> fld %st(0)
> frndint
> fldcw -2(%ebp)
> fld %st(0)
> fstpt (%eax)
> fucom %st(1)
> fnstsw -2(%ebp)
> movw -2(%ebp),%dx
> andb $0x44,%dh
> xorb $0x40,%dh
> jnz 0f
> fxam
> fnstsw -2(%ebp)
> fstp %st(0)
> fstp %st(0)
> fldz
> movw -2(%ebp),%dx
> andb $0x02,%dh
> jz 1f
> fchs
> jmp 1f
> 0:
> fsubrp %st,%st(1)
> 1:
> leave
> ret
>
--part1_140.19edd57f.2cab4271_boundary
Content-Type: text/html; charset="US-ASCII"
Content-Transfer-Encoding: quoted-printable
<HTML><FONT FACE=3Darial,helvetica><FONT SIZE=3D2 FAMILY=3D"SANSSERIF" FACE=
=3D"Arial" LANG=3D"0">Esa Peuha:<BR>
<BR>
Your code passed all tests in the test suite. Congratulations and than=
ks.<BR>
</FONT><FONT COLOR=3D"#000000" style=3D"BACKGROUND-COLOR: #ffffff" SIZE=3D3=
FAMILY=3D"SERIF" FACE=3D"Georgia" LANG=3D"0"><BR>
KB Williams<BR>
<BR>
In a message dated 9/30/2003 3:03:45 PM Eastern Standard Time, peuha AT cc DOT hels=
inki.fi writes:<BR>
<BR>
<BLOCKQUOTE TYPE=3DCITE style=3D"BORDER-LEFT: #0000ff 2px solid; MARGIN-LEFT=
: 5px; MARGIN-RIGHT: 0px; PADDING-LEFT: 5px"></FONT><FONT COLOR=3D"#000000"=
style=3D"BACKGROUND-COLOR: #ffffff" SIZE=3D2 FAMILY=3D"SANSSERIF" FACE=3D"A=
rial" LANG=3D"0">/* Copyright (C) 1994 DJ Delorie, see COPYING.DJ for detail=
s */<BR>
.text<BR>
.globl ___modfl<BR>
___modfl:<BR>
pushl %ebp<BR>
movl %esp,%ebp<BR>
subl $4,%esp<BR>
fldt 8(%ebp)<BR>
movl 20(%ebp),%eax<BR>
fnstcw -2(%ebp)<BR>
movw -2(%ebp),%dx<BR>
orb $0x0c,%dh<BR>
movw %dx,-4(%ebp)<BR>
fldcw -4(%ebp)<BR>
fld %st(0)<BR>
frndint<BR>
fldcw -2(%ebp)<BR>
fld %st(0)<BR>
fstpt (%eax)<BR>
fucom %st(1)<BR>
fnstsw -2(%ebp)<BR>
movw -2(%ebp),%dx<BR>
andb $0x44,%dh<BR>
xorb $0x40,%dh<BR>
jnz 0f<BR>
fxam<BR>
fnstsw -2(%ebp)<BR>
fstp %st(0)<BR>
fstp %st(0)<BR>
fldz<BR>
movw -2(%ebp),%dx<BR>
andb $0x02,%dh<BR>
jz 1f<BR>
fchs<BR>
jmp 1f<BR>
0:<BR>
fsubrp %st,%st(1)<BR>
1:<BR>
leave<BR>
ret<BR>
</BLOCKQUOTE><BR>
</FONT><FONT COLOR=3D"#000000" style=3D"BACKGROUND-COLOR: #ffffff" SIZE=3D3=
FAMILY=3D"SERIF" FACE=3D"Georgia" LANG=3D"0"><BR>
</FONT></HTML>
--part1_140.19edd57f.2cab4271_boundary--
- Raw text -