xref: /llvm-project/flang/test/Semantics/declarations08.f90 (revision b788d6283d160f0fcff9ca9109ea97960185dc71)
1! RUN: %python %S/test_errors.py %s %flang_fc1
2pointer(p,x)
3!ERROR: Cray pointee 'y' may not be a member of an EQUIVALENCE group
4pointer(p,y)
5!ERROR: Cray pointee 'x' may not be a member of a COMMON block
6common x
7equivalence(y,z)
8end
9