Error in egcs FORTRAN I/O?

Toon Moene toon@moene.indiv.nluug.nl
Fri Jan 2 12:54:00 GMT 1998


Paul,

>  I'm trying to use egcs 1.0 to compile our simulation
>  program (mix of FORTRAN and C). Everything went really
>  great (and performance jumped 20% up in comparison to
>  Absoft F77) until I run into an I/O error (reproducible).
>  I'm trying to execute the statement
>  	READ(10,END=100,FMT='(I4)') NERR1 and it fails
>  (with run-time error) in the middle of the file. 'errno'
>  is set to 29 (#define ESPIPE          29      /* Illegal
>  seek */) and I suspect that it happens right on the 4-K
>  block boundary.

[ On Red Hat 5.0-Intel ]

This suggests that it is a library problem (it could be libf2c.a  
that is at fault, or an underlying library - such as the libc  
library on your OS).  Therefore, the following questions are  
relevant:

    * The libc version on your system (find out by "echo /lib/libc.so.*")

    * The binutils version on your system (find out with "as -v" or  
"ld -v")

    * The version of ldd/ld.so on your system (find out with "ldd -v")

(Copied straight from the pre-release questionnaire ...)

A complete Fortran program showing the problem would be nice too.

Thanks,
Toon.



More information about the Gcc mailing list