Why is Lahey Fortran is erroring here?

From: Athanasios Migdalas (migdalas_at_ergasya.tuc.gr)
Date: 11/23/04


Date: Tue, 23 Nov 2004 04:43:00 +0200

Hi all,

any ideas to help me out here? It concerns
Lahey/Fujitsu Fortran 95 Compiler Release L6.20c (patched to c from a) and
a *very* simple call to one of the *simplest* BLAS subroutines.
Lahey changes the values of an array that is *not* even passed
to the subroutine! Same results produced before the patch too.

===============================================

INTEGER :: ia = 10, incx=2, incy1=2, incy2=3, i
INTEGER, PARAMETER :: n=10
INTEGER, DIMENSION(n) :: ix =(/(i, i=1,n)/), iy

iy = ix ! IX has correct values here
CALL iscal(n,ia,iy,incx)
                         ! but not here!!!!
===============================================

Both intel fortran 8.0 and g95 (october release)
produce correct results.

All run on a SuSE 9.1 (default kernel)

/Sakis