[Bug fortran/33268] read ('(f3.3)'), a rejected due to the extra (...)

[jvdelisle at gcc dot gnu dot org]

------- Comment #1 from jvdelisle at gcc dot gnu dot org  2007-08-31 20:05 
-------
The print case is rejected at run time.  See PR28397. IMHO

print('a'), 'Hello'   ! Invalid, caught at run time, no leading paren
                      ! in char expr.
write(*,('(a)')) 'Hello'  ! Valid, ('(a)') simplifies to '(a)', a char expr. 
read (*,('(f3.3)')) a  ! Valid, ('(f3.3)') simplifies to '(f3.3)', a char expr.
read '(f3'//'.3)', a  ! Valid, a char expr
read ('(f3.3)'), a ! Invalid, rejected at compile time, requires unit number.
end


-- 


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