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

--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de> 
---

For completeness, without -fdec :


$ gfortran-7-20161106 z1.f90
z1.f90:2:12:

    structure /s/
            1
Error: STRUCTURE at (1) is a DEC extension, enable with -fdec-structure
z1.f90:4:6:

    end structure
      1
Error: Expecting END PROGRAM statement at (1)
z1.f90:3:16:

       integer x(n) /1/
                1
Error: Variable 'n' cannot appear in the expression at (1)
z1.f90:3:18:

       integer x(n) /1/
                  1
Error: The module or main program array 'x' at (1) must have constant shape

in gfc_format_decoder, at fortran/error.c:935
0x68b46e gfc_format_decoder
        ../../gcc/fortran/error.c:935
0x13f1eef pp_format(pretty_printer*, text_info*)
        ../../gcc/pretty-print.c:660
0x13e5310 diagnostic_report_diagnostic(diagnostic_context*, diagnostic_info*)
        ../../gcc/diagnostic.c:947
0x68b307 gfc_error
        ../../gcc/fortran/error.c:1277
0x68c700 gfc_error(char const*, ...)
        ../../gcc/fortran/error.c:1306
0x6f152a check_data_variable
        ../../gcc/fortran/resolve.c:14939
0x6f152a traverse_data_var
        ../../gcc/fortran/resolve.c:15130
0x6fbc91 resolve_data
        ../../gcc/fortran/resolve.c:15185
0x6fbc91 resolve_types
        ../../gcc/fortran/resolve.c:15939
0x6f76ac gfc_resolve(gfc_namespace*)
        ../../gcc/fortran/resolve.c:16027
0x6e1bba resolve_all_program_units
        ../../gcc/fortran/parse.c:5883
0x6e1bba gfc_parse_file()
        ../../gcc/fortran/parse.c:6130
0x725822 gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:198

Reply via email to