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

kargl at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |kargl at gcc dot gnu.org

--- Comment #1 from kargl at gcc dot gnu.org ---
(In reply to Tobias Burnus from comment #0)
> print *, [str, "ab", "hjf333"] ! Accepted, why?
> print *, [str, str2]           ! Accepted, why?
> end

It appears to be an undocumented extension.  Add -Wall to your command line.

% gfcx -Wall -c a.f90
a.f90:2:20:

    2 | print *, [str, "ab", "hjf333"] ! Accepted, why?
      |                    1
Warning: CHARACTER expression at (1) is being truncated (6/3)
[-Wcharacter-truncation]
a.f90:3:14:

    3 | print *, [str, str2]           ! Accepted, why?
      |              1
Warning: CHARACTER expression at (1) is being truncated (4/3)
[-Wcharacter-truncation]

Reply via email to