[Bug fortran/57042] Strange typespec with -fdump-parse-tree

[fxcoudert at gcc dot gnu.org via Gcc-bugs]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=57042

Francois-Xavier Coudert <fxcoudert at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|ice-on-valid-code           |diagnostic
                 CC|                            |fxcoudert at gcc dot gnu.org
            Version|4.9.0                       |12.0

--- Comment #14 from Francois-Xavier Coudert <fxcoudert at gcc dot gnu.org> ---
The bug in the parse tree dump is still present, as ADJUSTL and TRIM have
unknown type:


$ cat s.f90 
program main
  implicit none
  print *, adjustl("   a   ")
  print *, trim("   a   ")
end

$ gfortran -fdump-fortran-original s.f90 

Namespace: A-Z: (UNKNOWN 0)
procedure name = main
  symtree: 'adjustl'     || symbol: 'adjustl'      
    type spec : (UNKNOWN 0)
    attributes: (PROCEDURE INTRINSIC-PROC  FUNCTION ARRAY-OUTER-DEPENDENCY)
    result: adjustl
  symtree: 'main'        || symbol: 'main'         
    type spec : (UNKNOWN 0)
    attributes: (PROGRAM PUBLIC  SUBROUTINE IS-MAIN-PROGRAM)
  symtree: 'trim'        || symbol: 'trim'         
    type spec : (UNKNOWN 0)
    attributes: (PROCEDURE INTRINSIC-PROC  FUNCTION ARRAY-OUTER-DEPENDENCY)
    result: trim

  code:
  WRITE UNIT=6 FMT=-1
  TRANSFER 'a      '
  DT_END
  WRITE UNIT=6 FMT=-1
  TRANSFER '   a'
  DT_END

------------------------------------------