public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug fortran/18714] New: Runtime hang in LAPACK routine SLAMC1 - in Quetzal benchmark suite
@ 2004-11-29 10:57 paul dot richard dot thomas at cea dot fr
  2004-11-30 12:47 ` [Bug fortran/18714] " paul dot richard dot thomas at cea dot fr
                   ` (10 more replies)
  0 siblings, 11 replies; 12+ messages in thread
From: paul dot richard dot thomas at cea dot fr @ 2004-11-29 10:57 UTC (permalink / raw)
  To: gcc-bugs

The full source is available by anonymous ftp from: 
ftp://ftp.cs.unm.edu/pub/smith-quetzal/codes.tar.Z
Directory lu (or I can provide directory lu, with gfc makefile)

The programme hangs in this routine, unless the print * , "" indicated below is 
included.

      SUBROUTINE SLAMC1( BETA, T, RND, IEEE1 )
*
*  -- LAPACK auxiliary routine (version 1.0) --
*     Univ. of Tennessee, Univ. of California Berkeley, NAG Ltd.,
*     Courant Institute, Argonne National Lab, and Rice University
*     February 29, 1992

      etc., etc. until

*
*+       WHILE( C.EQ.ONE )LOOP
   10    CONTINUE
         IF( C.EQ.ONE ) THEN
            A = 2*A
            C = SLAMC3( A, ONE )
            C = SLAMC3( C, -A )
            GO TO 10
         END IF
*+       END WHILE
*
*        Now compute  b = 2.0**m  with the smallest positive integer m
*        such that
*
*           fl( a + b ) .gt. a.
*
         B = 1
         C = SLAMC3( A, B )
         print *,""               !!!!!The code hangs without this line
                                  !!!!!Putting C = C does not cure the problem 
*
*+       WHILE( C.EQ.A )LOOP
   20    CONTINUE
         IF( C.EQ.A ) THEN
            B = 2*B
            C = SLAMC3( A, B )
            print *, C , C.EQ.A
            GO TO 20
         END IF
*+       END WHILE
*

and so on......

-- 
           Summary: Runtime hang in LAPACK routine SLAMC1 - in Quetzal
                    benchmark suite
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: paul dot richard dot thomas at cea dot fr
                CC: gcc-bugs at gcc dot gnu dot org,paulthomas2 at wanadoo
                    dot fr


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18714


^ permalink raw reply	[flat|nested] 12+ messages in thread
end of thread, other threads:[~2005-02-11 11:47 UTC | newest]

Thread overview: 12+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2004-11-29 10:57 [Bug fortran/18714] New: Runtime hang in LAPACK routine SLAMC1 - in Quetzal benchmark suite paul dot richard dot thomas at cea dot fr
2004-11-30 12:47 ` [Bug fortran/18714] " paul dot richard dot thomas at cea dot fr
2005-01-06 14:43 ` tobi at gcc dot gnu dot org
2005-01-09  4:50 ` giovannibajo at libero dot it
2005-01-28 12:19 ` coudert at clipper dot ens dot fr
2005-01-28 17:02 ` prthomas at drfccad dot cea dot fr
2005-01-28 17:08 ` paulthomas2 at wanadoo dot fr
2005-01-28 17:20 ` coudert at clipper dot ens dot fr
2005-02-11  2:04 ` coudert at clipper dot ens dot fr
2005-02-11  9:56 ` paulthomas2 at wanadoo dot fr
2005-02-11 10:00 ` paulthomas2 at wanadoo dot fr
2005-02-11 17:10 ` giovannibajo at libero dot it

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).