blob: d664c03e439ef630415899ed8cdae50d057858c4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
|
/* {dg-do compile } */
/* {dg-options } */
#include <cstdlib>
float q;
#if 1
int main2 (int argc, char **argv);
int main (int argc, char **argv)
{
int x = 0;
if (argc == 1)
{
const char *array[] = {"a.out", "5"};
x = main2 (2, (char **)array);
}
else
x = main2 (argc, argv);
return x;
}
#endif
void func (int *x)
{
*x = 5;
}
int main2 (int argc, const char **argv)
{
int array[10], array2[10];
#if 1
array2[:] = array[1.5:2]; /* { dg-error "start-index of array notation triplet is not an integer." } */
array2[:] = array[1:2.32333333333]; /* { dg-error "length of array notation triplet is not an integer." } */
array2[1:2:1.5] = array[:]; /* { dg-error "stride of array notation triplet is not an integer." } */
func (&array2[1:2.34:3]); /* { dg-error "length of array notation triplet is not an integer." } */
array2[1.43:9]++; /* { dg-error "start-index of array notation triplet is not an integer." } */
array2[1:9.3]++; /* { dg-error "length of array notation triplet is not an integer." } */
array2[1:9:0.3]++; /* { dg-error "stride of array notation triplet is not an integer." } */
++array2[1:q:3]; /* { dg-error "length of array notation triplet is not an integer." } */
array2[:] = array[q:1:3]; /* { dg-error "start-index of array notation triplet is not an integer." } */
array2[:] = array[1:q:3]; /* { dg-error "length of array notation triplet is not an integer." } */
array2[:] = array[1:3:q]; /* { dg-error "stride of array notation triplet is not an integer." } */
#endif
func (&array2[1:q:3]); /* { dg-error "length of array notation triplet is not an integer." } */
return 0;
}
|