public inbox for gcc-bugs@sourceware.org help / color / mirror / Atom feed
From: "pault at gcc dot gnu dot org" <gcc-bugzilla@gcc.gnu.org> To: gcc-bugs@gcc.gnu.org Subject: [Bug fortran/24518] Intrinsic MOD incorrect for large arg1/arg2 and slow. Date: Tue, 31 Oct 2006 16:21:00 -0000 [thread overview] Message-ID: <20061031162118.6341.qmail@sourceware.org> (raw) In-Reply-To: <bug-24518-9236@http.gcc.gnu.org/bugzilla/> ------- Comment #17 from pault at gcc dot gnu dot org 2006-10-31 16:21 ------- The fortran version of Uros' #13: real(8) :: x real(8) :: t = 0.0 x = 10000000.0 do while (x > 0.0) t = t + mod (x, 1.7e-8) x = x - 1.0 end do print *, t end Yields: $ /irun/bin/gfortran -O2 -march=pentium -mfpmath=387 uros_test.f90 PT169137@PC-THOMAS-P /cygdrive/d/svn/pr24518 $ time ./a 8.499998368231765E-002 real 0m0.344s user 0m0.327s sys 0m0.015s on a PIV running at 2.5GHz Changing MOD => MODULO, the user time increases to 0.405s for the implementation in the second attachment. Paul -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=24518
next prev parent reply other threads:[~2006-10-31 16:21 UTC|newest] Thread overview: 28+ messages / expand[flat|nested] mbox.gz Atom feed top 2005-10-25 13:21 [Bug fortran/24518] New: " paul dot richard dot thomas at cea dot fr 2005-10-25 14:37 ` [Bug fortran/24518] " pinskia at gcc dot gnu dot org 2006-06-20 12:44 ` fxcoudert at gcc dot gnu dot org 2006-06-21 8:04 ` paul dot richard dot thomas at cea dot fr 2006-10-22 21:01 ` fxcoudert at gcc dot gnu dot org 2006-10-23 6:19 ` fxcoudert at gcc dot gnu dot org 2006-10-25 7:34 ` uros at kss-loka dot si 2006-10-25 8:19 ` fxcoudert at gcc dot gnu dot org 2006-10-25 11:49 ` uros at kss-loka dot si 2006-10-25 13:53 ` fxcoudert at gcc dot gnu dot org 2006-10-25 14:16 ` uros at kss-loka dot si 2006-10-26 4:04 ` sgk at troutmask dot apl dot washington dot edu 2006-10-26 20:09 ` pault at gcc dot gnu dot org 2006-10-26 22:22 ` uros at kss-loka dot si 2006-10-31 15:56 ` pault at gcc dot gnu dot org 2006-10-31 16:06 ` fxcoudert at gcc dot gnu dot org 2006-10-31 16:14 ` paul dot richard dot thomas at cea dot fr 2006-10-31 16:21 ` pault at gcc dot gnu dot org [this message] 2006-10-31 16:47 ` fxcoudert at gcc dot gnu dot org 2006-11-05 6:28 ` pault at gcc dot gnu dot org 2006-11-05 8:46 ` pault at gcc dot gnu dot org 2006-11-05 22:18 ` pault at gcc dot gnu dot org 2006-11-10 21:53 ` pault at gcc dot gnu dot org 2006-12-01 0:09 ` chaoyingfu at gcc dot gnu dot org 2006-12-02 8:12 ` ebotcazou at gcc dot gnu dot org 2006-12-02 8:23 ` burnus at gcc dot gnu dot org 2006-12-02 8:28 ` pinskia at gcc dot gnu dot org [not found] <bug-24518-4@http.gcc.gnu.org/bugzilla/> 2012-05-05 8:02 ` jb at gcc dot gnu.org
Reply instructions: You may reply publicly to this message via plain-text email using any one of the following methods: * Save the following mbox file, import it into your mail client, and reply-to-all from there: mbox Avoid top-posting and favor interleaved quoting: https://en.wikipedia.org/wiki/Posting_style#Interleaved_style * Reply using the --to, --cc, and --in-reply-to switches of git-send-email(1): git send-email \ --in-reply-to=20061031162118.6341.qmail@sourceware.org \ --to=gcc-bugzilla@gcc.gnu.org \ --cc=gcc-bugs@gcc.gnu.org \ /path/to/YOUR_REPLY https://kernel.org/pub/software/scm/git/docs/git-send-email.html * If your mail client supports setting the In-Reply-To header via mailto: links, try the mailto: linkBe sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions for how to clone and mirror all data and code used for this inbox; as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).