------- Comment #2 from kargl at gcc dot gnu dot org 2008-12-22 00:28 ------- Please attach long files instead of embedded the code within the bug report. It makes it harder to copy and paste from a browser.
The code works with 4.3.3, so this is a regression. Here's a reduced testcase that needs to be linked to iso_varying_string. Save this as lkl.f90 and compile. program test_iso use iso_varying_string implicit none type(varying_string) :: v_str integer :: i, ios character(len=1) :: newlinechar=";" open (unit=1,file='lkl.f90', status='OLD') i = 0 do CALL get(unit=1,string=v_str, set=newlinechar, iostat=ios) if (ios.GT.0) stop 'Error on vs2 read' if (ios.EQ.-1) exit i = i + 1 print *, i, trim(char(v_str)) end do end -- kargl at gcc dot gnu dot org changed: What |Removed |Added ---------------------------------------------------------------------------- Status|UNCONFIRMED |NEW Ever Confirmed|0 |1 Priority|P3 |P4 Last reconfirmed|0000-00-00 00:00:00 |2008-12-22 00:28:42 date| | Summary|run time error (crash) - |[regression 4.4] segfault - |optional arguments, |optional arguments, |generics, interface problem,|generics, interface problem, |iso_varying_string ?? |iso_varying_string ?? http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38602