|
111
|
1 /* { dg-do run } */
|
|
|
2 /* { dg-require-alias "" } */
|
|
|
3 /* { dg-options "-O2" } */
|
|
|
4
|
|
|
5 #include <stdio.h>
|
|
|
6 #include <stdlib.h>
|
|
|
7 #include <string.h>
|
|
|
8
|
|
|
9 typedef struct dw_cfi_struct
|
|
|
10 {
|
|
|
11 struct dw_cfi_struct *dw_cfi_next;
|
|
|
12 const char *dw_cfi_addr;
|
|
|
13 }
|
|
|
14 dw_cfi_node;
|
|
|
15
|
|
|
16 typedef struct dw_fde_struct
|
|
|
17 {
|
|
|
18 const char *dw_fde_current_label;
|
|
|
19 dw_cfi_node *dw_fde_cfi;
|
|
|
20 }
|
|
|
21 dw_fde_node;
|
|
|
22
|
|
|
23 dw_cfi_node *cie_cfi_head;
|
|
|
24 unsigned fde_table_in_use;
|
|
|
25 dw_fde_node *fde_table;
|
|
|
26
|
|
|
27 static __inline__ void
|
|
|
28 add_cfi (dw_cfi_node **list_head, dw_cfi_node *cfi)
|
|
|
29 {
|
|
|
30 dw_cfi_node **p;
|
|
|
31
|
|
|
32 for (p = list_head; (*p) != ((void *)0); p = &(*p)->dw_cfi_next)
|
|
|
33 ;
|
|
|
34
|
|
|
35 *p = cfi;
|
|
|
36 }
|
|
|
37
|
|
|
38 static __inline__ struct dw_cfi_struct *
|
|
|
39 new_cfi (void)
|
|
|
40 {
|
|
|
41 dw_cfi_node *cfi = (dw_cfi_node *) malloc (sizeof (dw_cfi_node));
|
|
|
42
|
|
|
43 memset (cfi, 0, sizeof (dw_cfi_node));
|
|
|
44 return cfi;
|
|
|
45 }
|
|
|
46
|
|
|
47 char *
|
|
|
48 dwarf2out_cfi_label (void)
|
|
|
49 {
|
|
|
50 static char label[20];
|
|
|
51 static unsigned long label_num = 0;
|
|
|
52
|
|
|
53 sprintf (label, "*.%s%u", "LCFI", (unsigned) (label_num++));
|
|
|
54 return label;
|
|
|
55 }
|
|
|
56
|
|
|
57 void
|
|
|
58 add_fde_cfi (const char *label, dw_cfi_node *cfi)
|
|
|
59 {
|
|
|
60 if (label)
|
|
|
61 {
|
|
|
62 dw_fde_node *fde = fde_table + fde_table_in_use - 1;
|
|
|
63
|
|
|
64 if (*label == 0)
|
|
|
65 label = dwarf2out_cfi_label ();
|
|
|
66
|
|
|
67 if (fde->dw_fde_current_label == ((void *)0)
|
|
|
68 || strcmp (label, fde->dw_fde_current_label))
|
|
|
69 {
|
|
|
70 dw_cfi_node *xcfi;
|
|
|
71
|
|
|
72 fde->dw_fde_current_label = label = strdup (label);
|
|
|
73
|
|
|
74 xcfi = new_cfi ();
|
|
|
75 xcfi->dw_cfi_addr = label;
|
|
|
76 add_cfi (&fde->dw_fde_cfi, xcfi);
|
|
|
77 }
|
|
|
78
|
|
|
79 add_cfi (&fde->dw_fde_cfi, cfi);
|
|
|
80 }
|
|
|
81 else
|
|
|
82 add_cfi (&cie_cfi_head, cfi);
|
|
|
83 }
|
|
|
84
|
|
|
85 int
|
|
|
86 main ()
|
|
|
87 {
|
|
|
88 dw_cfi_node *cfi;
|
|
|
89 dw_fde_node *fde;
|
|
|
90
|
|
|
91 fde_table_in_use = 1;
|
|
|
92 fde_table = (dw_fde_node *) realloc (fde_table,
|
|
|
93 sizeof (dw_fde_node));
|
|
|
94 memset (fde_table, 0, sizeof (dw_fde_node));
|
|
|
95 cfi = new_cfi ();
|
|
|
96 add_fde_cfi ("", cfi);
|
|
|
97
|
|
|
98 fde = &fde_table[0];
|
|
|
99 cfi = fde->dw_fde_cfi;
|
|
|
100
|
|
|
101 if (cfi == NULL)
|
|
|
102 abort ();
|
|
|
103
|
|
|
104 if (cfi->dw_cfi_addr == NULL)
|
|
|
105 abort ();
|
|
|
106
|
|
|
107 if (strcmp ("*.LCFI0", cfi->dw_cfi_addr))
|
|
|
108 abort ();
|
|
|
109
|
|
|
110 return 0;
|
|
|
111 }
|
