[Bug fortran/82743] uncaught character truncation in derived type initialization

[simon.kluepfel at gmail dot com]

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

--- Comment #1 from Simon Klüpfel <simon.kluepfel at gmail dot com> ---
One more thing I tested. When the default initialization is too long, it is
caught as expected.

PROGRAM TEST
    TYPE A
        CHARACTER(LEN=1) :: C="123"
    END TYPE A
END PROGRAM TEST

gives 

main.f95:3:30:

         CHARACTER(LEN=1) :: C="123"
                              1
Warning: CHARACTER expression at (1) is being truncated (3/1)
[-Wcharacter-truncation]