Mercurial > hg > CbC > CbC_gcc

annotate gcc/testsuite/gcc.dg/Walloca-larger-than.c @ 131:84e7813d76e9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gcc-8.2
author mir3636
date Thu, 25 Oct 2018 07:37:49 +0900
parents
children 1830386684a0
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
131
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
1 /* PR middle-end/82063 - issues with arguments enabled by -Wall
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
2 { dg-do compile }
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
3 { dg-options "-O2 -Walloca-larger-than=0 -Wvla-larger-than=0 -ftrack-macro-expansion=0" } */
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
4
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
5 extern void* alloca (__SIZE_TYPE__);
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
6
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
7 void sink (void*);
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
8
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
9 #define T(x) sink (x)
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
10
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
11 void test_alloca (void)
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
12 {
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
13 /* Verify that alloca(0) is diagnosed even if the limit is zero. */
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
14 T (alloca (0)); /* { dg-warning "argument to .alloca. is zero" } */
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
15 T (alloca (1)); /* { dg-warning "argument to .alloca. is too large" } */
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
16 }
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
17
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
18 void test_vla (unsigned n)
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
19 {
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
20 /* VLAs smaller than 32 bytes are optimized into ordinary arrays. */
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
21 if (n < 1 || 99 < n)
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
22 n = 1;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
23
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
24 char a[n]; /* { dg-warning "argument to variable-length array " } */
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
25 T (a);
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
26 }