1 /* { dg-options "-fdump-tree-asan" } */
2 /* { dg-do compile } */
3 /* { dg-skip-if "" { *-*-* } { "*" } { "-O3" } } */
4 
5 int ext;
6 
7 int
Perl_do_sv_dump()8 Perl_do_sv_dump()
9 {
10     int freq[10];
11     int i;
12     int max = 0;
13 
14     if (max < ext)
15       max = ext;
16 
17     for (i = 0; i <= max; i++)
18       if (freq[i])
19 	ext = 0;
20 
21     if (i > 20)
22       return freq[i];
23     else
24       return 0;
25 }
26 
27 /* { dg-final { scan-tree-dump-times "ASAN_CHECK" 2 "asan1" } } */
28