blob: 22efe08d796accc736590f1926d54bcd69209450 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
! RUN: %python %S/test_errors.py %s %flang_fc1
! Check for new semantic errors from misuse of the DEC STRUCTURE extension
program main
!ERROR: Derived type '/undeclared/' not found
record /undeclared/ var
structure /s/
!ERROR: /s/ is not a known STRUCTURE
record /s/ attemptToRecurse
!ERROR: not yet implemented: support for UNION
union
map
integer j
end map
map
real x
end map
end union
end structure
end
|
