Mercurial > hg > CbC > CbC_gcc
annotate gcc/testsuite/gcc.dg/tree-ssa/pr24840.c @ 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 |
rev | line source |
---|---|
111 | 1 /* { dg-do compile } */ |
2 /* { dg-options "-O2" } */ | |
3 | |
4 typedef struct | |
5 { | |
6 int tag, y; | |
7 } Object; | |
8 | |
9 void Err_Handler () __attribute__ ((__noreturn__)); | |
10 void Wrong_Type (Object, int); | |
11 | |
12 int | |
13 P_Error (int argc, Object * argv) | |
14 { | |
15 if (((argv[1]).tag >> 1) != 11) | |
16 Wrong_Type (argv[1], 11); | |
17 Err_Handler (argv[0], argv[1], argc - 2, argv + 2); | |
18 } |