annotate gcc/testsuite/gcc.dg/cpp/charconst-3.c @ 111:04ced10e8804

gcc 7
author kono
date Fri, 27 Oct 2017 22:46:09 +0900
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1 /* Copyright (C) 2001 Free Software Foundation, Inc. */
kono
parents:
diff changeset
2
kono
parents:
diff changeset
3 /* { dg-do run } */
kono
parents:
diff changeset
4 /* { dg-options -Wno-multichar } */
kono
parents:
diff changeset
5
kono
parents:
diff changeset
6 /* This tests values and signedness of multichar charconsts.
kono
parents:
diff changeset
7
kono
parents:
diff changeset
8 Neil Booth, 5 May 2002. */
kono
parents:
diff changeset
9
kono
parents:
diff changeset
10 #include <limits.h>
kono
parents:
diff changeset
11
kono
parents:
diff changeset
12 extern void abort (void);
kono
parents:
diff changeset
13
kono
parents:
diff changeset
14 int main ()
kono
parents:
diff changeset
15 {
kono
parents:
diff changeset
16 /* These tests require at least 2-byte ints. 8-) */
kono
parents:
diff changeset
17 #if INT_MAX > 127
kono
parents:
diff changeset
18 int scale = (int) (unsigned char) -1 + 1;
kono
parents:
diff changeset
19
kono
parents:
diff changeset
20 if ('ab' != (int) ((unsigned char) 'a' * scale + (unsigned char) 'b'))
kono
parents:
diff changeset
21 abort ();
kono
parents:
diff changeset
22
kono
parents:
diff changeset
23 if ('\234b' != (int) ((unsigned char) '\234' * scale + (unsigned char) 'b'))
kono
parents:
diff changeset
24 abort ();
kono
parents:
diff changeset
25
kono
parents:
diff changeset
26 if ('b\234' != (int) ((unsigned char) 'b' * scale + (unsigned char) '\234'))
kono
parents:
diff changeset
27 abort ();
kono
parents:
diff changeset
28 /* Multichar charconsts have type int and should be signed. */
kono
parents:
diff changeset
29 #if INT_MAX == 32767
kono
parents:
diff changeset
30 # if '\234a' > 0
kono
parents:
diff changeset
31 # error Preprocessor charconsts 1
kono
parents:
diff changeset
32 # endif
kono
parents:
diff changeset
33 if ('\234a' > 0)
kono
parents:
diff changeset
34 abort ();
kono
parents:
diff changeset
35 #elif INT_MAX == 2147483647
kono
parents:
diff changeset
36 # if '\234aaa' > 0
kono
parents:
diff changeset
37 # error Preprocessor charconsts 2
kono
parents:
diff changeset
38 # endif
kono
parents:
diff changeset
39 if ('\234aaa' > 0)
kono
parents:
diff changeset
40 abort ();
kono
parents:
diff changeset
41 #elif INT_MAX == 9223372036854775807
kono
parents:
diff changeset
42 # if '\234aaaaaaa' > 0
kono
parents:
diff changeset
43 # error Preprocessor charconsts 3
kono
parents:
diff changeset
44 # endif
kono
parents:
diff changeset
45 if ('\234aaaaaaa' > 0)
kono
parents:
diff changeset
46 abort ();
kono
parents:
diff changeset
47 #endif
kono
parents:
diff changeset
48 #endif
kono
parents:
diff changeset
49 return 0;
kono
parents:
diff changeset
50 }