[flang] Fix allocate in deallocate01.f90 test
Original-commit: flang-compiler/f18@681e51f50b Tree-same-pre-rewrite: false
This commit is contained in:
parent
ce05ebf748
commit
1cc1ef2629
|
@ -31,7 +31,7 @@ CHARACTER(256) :: e
|
|||
|
||||
Integer, Pointer :: pi
|
||||
|
||||
Allocate(p)
|
||||
Allocate(pi)
|
||||
Allocate(x(3))
|
||||
|
||||
Deallocate(x(2)%p)
|
||||
|
|
Loading…
Reference in a new issue