| ! { dg-do compile } | |
| ! | |
| ! PR 88009: [9 Regression] ICE in find_intrinsic_vtab, at fortran/class.c:2761 | |
| ! | |
| ! Contributed by G. Steinmetz <gscfq@t-online.de> | |
| module m | |
| class(*), allocatable :: z | |
| end | |
| block data | |
| use m | |
| z = 'z' ! { dg-error "assignment statement is not allowed|Unexpected assignment statement" } | |
| end |