X-Authentication-Warning: delorie.com: mail set sender to djgpp-workers-bounces using -f From: Kbwms AT aol DOT com Message-ID: <140.19edd57f.2cab4271@aol.com> Date: Tue, 30 Sep 2003 16:32:49 EDT Subject: Re: Bug in modfl() in libc.a To: djgpp-workers AT delorie DOT com MIME-Version: 1.0 Content-Type: multipart/alternative; boundary="part1_140.19edd57f.2cab4271_boundary" X-Mailer: 8.0 for Windows sub 6015 Reply-To: djgpp-workers AT delorie DOT com --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 Esa Peuha:

Your code passed all tests in the test suite.  Congratulations and than= ks.

KB Williams

In a message dated 9/30/2003 3:03:45 PM Eastern Standard Time, peuha AT cc DOT hels= inki.fi writes:

/* Copyright (C) 1994 DJ Delorie, see COPYING.DJ for detail= s */
  .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--