annotate gcc/testsuite/gfortran.dg/dependency_12.f90 @ 158:494b0b89df80 default tip

...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 25 May 2020 18:13:55 +0900
parents 04ced10e8804
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1 ! { dg-do compile }
kono
parents:
diff changeset
2 ! { dg-options "-O2 -fdump-tree-original" }
kono
parents:
diff changeset
3 subroutine foo(a,b)
kono
parents:
diff changeset
4 integer, pointer, dimension (:,:) :: a
kono
parents:
diff changeset
5 real, dimension(:,:) :: b
kono
parents:
diff changeset
6
kono
parents:
diff changeset
7 where (a == 0)
kono
parents:
diff changeset
8 b = 0.0
kono
parents:
diff changeset
9 endwhere
kono
parents:
diff changeset
10 end subroutine
kono
parents:
diff changeset
11 ! { dg-final { scan-tree-dump-times "malloc" 0 "original" } }