Internal file READ statement

Salvatore Filippone sfilippone@uniroma2.it
Tue Aug 31 13:34:00 GMT 2004


Snapshot 20040829, i686 linux. 

The attached code generates the following (IMHO misleading) error
message. 
[sfilippo@euler RUNS]$ ./try
At line 8 of file try.f90
Fortran runtime error: No such device

program try
  character(8) :: buffer
  integer       :: i
  
  buffer = '00000010'
  
  read(buffer,*) j
  print *,j
  stop
end program try



Same code works if written as 
read(buffer,'(i8)') j

Bug, feature, user error, ???

Thanks

-- 
Salvatore Filippone -- sfilippone@NOSPAMuniroma2.it



More information about the Fortran mailing list