Mercurial > hg > CbC > CbC_gcc
annotate gcc/lto-streamer-in.c @ 158:494b0b89df80 default tip
...
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 25 May 2020 18:13:55 +0900 |
parents | 1830386684a0 |
children |
rev | line source |
---|---|
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1 /* Read the GIMPLE representation from a file stream. |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
2 |
145 | 3 Copyright (C) 2009-2020 Free Software Foundation, Inc. |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
4 Contributed by Kenneth Zadeck <zadeck@naturalbridge.com> |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
5 Re-implemented by Diego Novillo <dnovillo@google.com> |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
6 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
7 This file is part of GCC. |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
8 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
9 GCC is free software; you can redistribute it and/or modify it under |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
10 the terms of the GNU General Public License as published by the Free |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
11 Software Foundation; either version 3, or (at your option) any later |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
12 version. |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
13 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
14 GCC is distributed in the hope that it will be useful, but WITHOUT ANY |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
15 WARRANTY; without even the implied warranty of MERCHANTABILITY or |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
16 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
17 for more details. |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
18 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
19 You should have received a copy of the GNU General Public License |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
20 along with GCC; see the file COPYING3. If not see |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
21 <http://www.gnu.org/licenses/>. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
22 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
23 #include "config.h" |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
24 #include "system.h" |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
25 #include "coretypes.h" |
111 | 26 #include "backend.h" |
27 #include "target.h" | |
28 #include "rtl.h" | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
29 #include "tree.h" |
111 | 30 #include "gimple.h" |
31 #include "cfghooks.h" | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
32 #include "tree-pass.h" |
111 | 33 #include "ssa.h" |
34 #include "gimple-streamer.h" | |
35 #include "toplev.h" | |
36 #include "gimple-iterator.h" | |
37 #include "tree-cfg.h" | |
38 #include "tree-into-ssa.h" | |
39 #include "tree-dfa.h" | |
40 #include "tree-ssa.h" | |
41 #include "except.h" | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
42 #include "cgraph.h" |
111 | 43 #include "cfgloop.h" |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
44 #include "debug.h" |
145 | 45 #include "alloc-pool.h" |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
46 |
145 | 47 /* Allocator used to hold string slot entries for line map streaming. */ |
48 static struct object_allocator<struct string_slot> *string_slot_allocator; | |
111 | 49 |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
50 /* The table to hold the file names. */ |
145 | 51 static hash_table<string_slot_hasher> *file_name_hash_table; |
52 | |
53 /* This obstack holds file names used in locators. Line map datastructures | |
54 points here and thus it needs to be kept allocated as long as linemaps | |
55 exists. */ | |
56 static struct obstack file_name_obstack; | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
57 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
58 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
59 /* Check that tag ACTUAL has one of the given values. NUM_TAGS is the |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
60 number of valid tag values to check. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
61 |
111 | 62 void |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
63 lto_tag_check_set (enum LTO_tags actual, int ntags, ...) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
64 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
65 va_list ap; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
66 int i; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
67 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
68 va_start (ap, ntags); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
69 for (i = 0; i < ntags; i++) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
70 if ((unsigned) actual == va_arg (ap, unsigned)) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
71 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
72 va_end (ap); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
73 return; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
74 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
75 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
76 va_end (ap); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
77 internal_error ("bytecode stream: unexpected tag %s", lto_tag_name (actual)); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
78 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
79 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
80 |
111 | 81 /* Read LENGTH bytes from STREAM to ADDR. */ |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
82 |
111 | 83 void |
145 | 84 lto_input_data_block (class lto_input_block *ib, void *addr, size_t length) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
85 { |
111 | 86 size_t i; |
87 unsigned char *const buffer = (unsigned char *) addr; | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
88 |
111 | 89 for (i = 0; i < length; i++) |
90 buffer[i] = streamer_read_uchar (ib); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
91 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
92 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
93 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
94 /* Lookup STRING in file_name_hash_table. If found, return the existing |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
95 string, otherwise insert STRING as the canonical version. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
96 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
97 static const char * |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
98 canon_file_name (const char *string) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
99 { |
111 | 100 string_slot **slot; |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
101 struct string_slot s_slot; |
111 | 102 size_t len = strlen (string); |
103 | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
104 s_slot.s = string; |
111 | 105 s_slot.len = len; |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
106 |
111 | 107 slot = file_name_hash_table->find_slot (&s_slot, INSERT); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
108 if (*slot == NULL) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
109 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
110 char *saved_string; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
111 struct string_slot *new_slot; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
112 |
145 | 113 saved_string = XOBNEWVEC (&file_name_obstack, char, len + 1); |
114 new_slot = string_slot_allocator->allocate (); | |
111 | 115 memcpy (saved_string, string, len + 1); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
116 new_slot->s = saved_string; |
111 | 117 new_slot->len = len; |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
118 *slot = new_slot; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
119 return saved_string; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
120 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
121 else |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
122 { |
111 | 123 struct string_slot *old_slot = *slot; |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
124 return old_slot->s; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
125 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
126 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
127 |
111 | 128 /* Pointer to currently alive instance of lto_location_cache. */ |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
129 |
111 | 130 lto_location_cache *lto_location_cache::current_cache; |
131 | |
132 /* Sort locations in source order. Start with file from last application. */ | |
133 | |
134 int | |
135 lto_location_cache::cmp_loc (const void *pa, const void *pb) | |
136 { | |
137 const cached_location *a = ((const cached_location *)pa); | |
138 const cached_location *b = ((const cached_location *)pb); | |
139 const char *current_file = current_cache->current_file; | |
140 int current_line = current_cache->current_line; | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
141 |
111 | 142 if (a->file == current_file && b->file != current_file) |
143 return -1; | |
144 if (a->file != current_file && b->file == current_file) | |
145 return 1; | |
146 if (a->file == current_file && b->file == current_file) | |
147 { | |
148 if (a->line == current_line && b->line != current_line) | |
149 return -1; | |
150 if (a->line != current_line && b->line == current_line) | |
151 return 1; | |
152 } | |
153 if (a->file != b->file) | |
154 return strcmp (a->file, b->file); | |
155 if (a->sysp != b->sysp) | |
156 return a->sysp ? 1 : -1; | |
157 if (a->line != b->line) | |
158 return a->line - b->line; | |
159 return a->col - b->col; | |
160 } | |
161 | |
162 /* Apply all changes in location cache. Add locations into linemap and patch | |
163 trees. */ | |
164 | |
165 bool | |
166 lto_location_cache::apply_location_cache () | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
167 { |
111 | 168 static const char *prev_file; |
169 if (!loc_cache.length ()) | |
170 return false; | |
171 if (loc_cache.length () > 1) | |
172 loc_cache.qsort (cmp_loc); | |
173 | |
174 for (unsigned int i = 0; i < loc_cache.length (); i++) | |
175 { | |
176 struct cached_location loc = loc_cache[i]; | |
177 | |
178 if (current_file != loc.file) | |
179 linemap_add (line_table, prev_file ? LC_RENAME : LC_ENTER, | |
180 loc.sysp, loc.file, loc.line); | |
181 else if (current_line != loc.line) | |
182 { | |
183 int max = loc.col; | |
184 | |
185 for (unsigned int j = i + 1; j < loc_cache.length (); j++) | |
186 if (loc.file != loc_cache[j].file | |
187 || loc.line != loc_cache[j].line) | |
188 break; | |
189 else if (max < loc_cache[j].col) | |
190 max = loc_cache[j].col; | |
191 linemap_line_start (line_table, loc.line, max + 1); | |
192 } | |
193 gcc_assert (*loc.loc == BUILTINS_LOCATION + 1); | |
194 if (current_file == loc.file && current_line == loc.line | |
195 && current_col == loc.col) | |
196 *loc.loc = current_loc; | |
197 else | |
198 current_loc = *loc.loc = linemap_position_for_column (line_table, | |
199 loc.col); | |
200 current_line = loc.line; | |
201 prev_file = current_file = loc.file; | |
202 current_col = loc.col; | |
203 } | |
204 loc_cache.truncate (0); | |
205 accepted_length = 0; | |
206 return true; | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
207 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
208 |
111 | 209 /* Tree merging did not suceed; mark all changes in the cache as accepted. */ |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
210 |
111 | 211 void |
212 lto_location_cache::accept_location_cache () | |
213 { | |
214 gcc_assert (current_cache == this); | |
215 accepted_length = loc_cache.length (); | |
216 } | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
217 |
111 | 218 /* Tree merging did suceed; throw away recent changes. */ |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
219 |
111 | 220 void |
221 lto_location_cache::revert_location_cache () | |
222 { | |
223 loc_cache.truncate (accepted_length); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
224 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
225 |
111 | 226 /* Read a location bitpack from input block IB and either update *LOC directly |
227 or add it to the location cache. | |
228 It is neccesary to call apply_location_cache to get *LOC updated. */ | |
229 | |
230 void | |
231 lto_location_cache::input_location (location_t *loc, struct bitpack_d *bp, | |
145 | 232 class data_in *data_in) |
111 | 233 { |
234 static const char *stream_file; | |
235 static int stream_line; | |
236 static int stream_col; | |
237 static bool stream_sysp; | |
238 bool file_change, line_change, column_change; | |
239 | |
240 gcc_assert (current_cache == this); | |
241 | |
242 *loc = bp_unpack_int_in_range (bp, "location", 0, RESERVED_LOCATION_COUNT); | |
243 | |
244 if (*loc < RESERVED_LOCATION_COUNT) | |
245 return; | |
246 | |
247 /* Keep value RESERVED_LOCATION_COUNT in *loc as linemap lookups will | |
248 ICE on it. */ | |
249 | |
250 file_change = bp_unpack_value (bp, 1); | |
251 line_change = bp_unpack_value (bp, 1); | |
252 column_change = bp_unpack_value (bp, 1); | |
253 | |
254 if (file_change) | |
255 { | |
256 stream_file = canon_file_name (bp_unpack_string (data_in, bp)); | |
257 stream_sysp = bp_unpack_value (bp, 1); | |
258 } | |
259 | |
260 if (line_change) | |
261 stream_line = bp_unpack_var_len_unsigned (bp); | |
262 | |
263 if (column_change) | |
264 stream_col = bp_unpack_var_len_unsigned (bp); | |
265 | |
266 /* This optimization saves location cache operations druing gimple | |
267 streaming. */ | |
268 | |
269 if (current_file == stream_file && current_line == stream_line | |
270 && current_col == stream_col && current_sysp == stream_sysp) | |
271 { | |
272 *loc = current_loc; | |
273 return; | |
274 } | |
275 | |
276 struct cached_location entry | |
277 = {stream_file, loc, stream_line, stream_col, stream_sysp}; | |
278 loc_cache.safe_push (entry); | |
279 } | |
280 | |
281 /* Read a location bitpack from input block IB and either update *LOC directly | |
282 or add it to the location cache. | |
283 It is neccesary to call apply_location_cache to get *LOC updated. */ | |
284 | |
285 void | |
286 lto_input_location (location_t *loc, struct bitpack_d *bp, | |
145 | 287 class data_in *data_in) |
111 | 288 { |
289 data_in->location_cache.input_location (loc, bp, data_in); | |
290 } | |
291 | |
292 /* Read location and return it instead of going through location caching. | |
293 This should be used only when the resulting location is not going to be | |
294 discarded. */ | |
295 | |
296 location_t | |
145 | 297 stream_input_location_now (struct bitpack_d *bp, class data_in *data_in) |
111 | 298 { |
299 location_t loc; | |
300 stream_input_location (&loc, bp, data_in); | |
301 data_in->location_cache.apply_location_cache (); | |
302 return loc; | |
303 } | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
304 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
305 /* Read a reference to a tree node from DATA_IN using input block IB. |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
306 TAG is the expected node that should be found in IB, if TAG belongs |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
307 to one of the indexable trees, expect to read a reference index to |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
308 be looked up in one of the symbol tables, otherwise read the pysical |
111 | 309 representation of the tree using stream_read_tree. FN is the |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
310 function scope for the read tree. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
311 |
111 | 312 tree |
145 | 313 lto_input_tree_ref (class lto_input_block *ib, class data_in *data_in, |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
314 struct function *fn, enum LTO_tags tag) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
315 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
316 unsigned HOST_WIDE_INT ix_u; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
317 tree result = NULL_TREE; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
318 |
111 | 319 lto_tag_check_range (tag, LTO_field_decl_ref, LTO_namelist_decl_ref); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
320 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
321 switch (tag) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
322 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
323 case LTO_type_ref: |
111 | 324 ix_u = streamer_read_uhwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
325 result = lto_file_decl_data_get_type (data_in->file_data, ix_u); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
326 break; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
327 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
328 case LTO_ssa_name_ref: |
111 | 329 ix_u = streamer_read_uhwi (ib); |
330 result = (*SSANAMES (fn))[ix_u]; | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
331 break; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
332 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
333 case LTO_field_decl_ref: |
111 | 334 ix_u = streamer_read_uhwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
335 result = lto_file_decl_data_get_field_decl (data_in->file_data, ix_u); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
336 break; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
337 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
338 case LTO_function_decl_ref: |
111 | 339 ix_u = streamer_read_uhwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
340 result = lto_file_decl_data_get_fn_decl (data_in->file_data, ix_u); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
341 break; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
342 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
343 case LTO_type_decl_ref: |
111 | 344 ix_u = streamer_read_uhwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
345 result = lto_file_decl_data_get_type_decl (data_in->file_data, ix_u); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
346 break; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
347 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
348 case LTO_namespace_decl_ref: |
111 | 349 ix_u = streamer_read_uhwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
350 result = lto_file_decl_data_get_namespace_decl (data_in->file_data, ix_u); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
351 break; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
352 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
353 case LTO_global_decl_ref: |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
354 case LTO_result_decl_ref: |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
355 case LTO_const_decl_ref: |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
356 case LTO_imported_decl_ref: |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
357 case LTO_label_decl_ref: |
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
358 case LTO_translation_unit_decl_ref: |
111 | 359 case LTO_namelist_decl_ref: |
360 ix_u = streamer_read_uhwi (ib); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
361 result = lto_file_decl_data_get_var_decl (data_in->file_data, ix_u); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
362 break; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
363 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
364 default: |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
365 gcc_unreachable (); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
366 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
367 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
368 gcc_assert (result); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
369 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
370 return result; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
371 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
372 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
373 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
374 /* Read and return a double-linked list of catch handlers from input |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
375 block IB, using descriptors in DATA_IN. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
376 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
377 static struct eh_catch_d * |
145 | 378 lto_input_eh_catch_list (class lto_input_block *ib, class data_in *data_in, |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
379 eh_catch *last_p) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
380 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
381 eh_catch first; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
382 enum LTO_tags tag; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
383 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
384 *last_p = first = NULL; |
111 | 385 tag = streamer_read_record_start (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
386 while (tag) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
387 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
388 tree list; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
389 eh_catch n; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
390 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
391 lto_tag_check_range (tag, LTO_eh_catch, LTO_eh_catch); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
392 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
393 /* Read the catch node. */ |
111 | 394 n = ggc_cleared_alloc<eh_catch_d> (); |
395 n->type_list = stream_read_tree (ib, data_in); | |
396 n->filter_list = stream_read_tree (ib, data_in); | |
397 n->label = stream_read_tree (ib, data_in); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
398 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
399 /* Register all the types in N->FILTER_LIST. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
400 for (list = n->filter_list; list; list = TREE_CHAIN (list)) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
401 add_type_for_runtime (TREE_VALUE (list)); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
402 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
403 /* Chain N to the end of the list. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
404 if (*last_p) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
405 (*last_p)->next_catch = n; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
406 n->prev_catch = *last_p; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
407 *last_p = n; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
408 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
409 /* Set the head of the list the first time through the loop. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
410 if (first == NULL) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
411 first = n; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
412 |
111 | 413 tag = streamer_read_record_start (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
414 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
415 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
416 return first; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
417 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
418 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
419 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
420 /* Read and return EH region IX from input block IB, using descriptors |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
421 in DATA_IN. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
422 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
423 static eh_region |
145 | 424 input_eh_region (class lto_input_block *ib, class data_in *data_in, int ix) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
425 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
426 enum LTO_tags tag; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
427 eh_region r; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
428 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
429 /* Read the region header. */ |
111 | 430 tag = streamer_read_record_start (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
431 if (tag == LTO_null) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
432 return NULL; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
433 |
111 | 434 r = ggc_cleared_alloc<eh_region_d> (); |
435 r->index = streamer_read_hwi (ib); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
436 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
437 gcc_assert (r->index == ix); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
438 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
439 /* Read all the region pointers as region numbers. We'll fix up |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
440 the pointers once the whole array has been read. */ |
111 | 441 r->outer = (eh_region) (intptr_t) streamer_read_hwi (ib); |
442 r->inner = (eh_region) (intptr_t) streamer_read_hwi (ib); | |
443 r->next_peer = (eh_region) (intptr_t) streamer_read_hwi (ib); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
444 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
445 switch (tag) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
446 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
447 case LTO_ert_cleanup: |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
448 r->type = ERT_CLEANUP; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
449 break; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
450 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
451 case LTO_ert_try: |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
452 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
453 struct eh_catch_d *last_catch; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
454 r->type = ERT_TRY; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
455 r->u.eh_try.first_catch = lto_input_eh_catch_list (ib, data_in, |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
456 &last_catch); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
457 r->u.eh_try.last_catch = last_catch; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
458 break; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
459 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
460 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
461 case LTO_ert_allowed_exceptions: |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
462 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
463 tree l; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
464 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
465 r->type = ERT_ALLOWED_EXCEPTIONS; |
111 | 466 r->u.allowed.type_list = stream_read_tree (ib, data_in); |
467 r->u.allowed.label = stream_read_tree (ib, data_in); | |
468 r->u.allowed.filter = streamer_read_uhwi (ib); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
469 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
470 for (l = r->u.allowed.type_list; l ; l = TREE_CHAIN (l)) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
471 add_type_for_runtime (TREE_VALUE (l)); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
472 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
473 break; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
474 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
475 case LTO_ert_must_not_throw: |
111 | 476 { |
477 r->type = ERT_MUST_NOT_THROW; | |
478 r->u.must_not_throw.failure_decl = stream_read_tree (ib, data_in); | |
479 bitpack_d bp = streamer_read_bitpack (ib); | |
480 r->u.must_not_throw.failure_loc | |
481 = stream_input_location_now (&bp, data_in); | |
482 } | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
483 break; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
484 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
485 default: |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
486 gcc_unreachable (); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
487 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
488 |
111 | 489 r->landing_pads = (eh_landing_pad) (intptr_t) streamer_read_hwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
490 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
491 return r; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
492 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
493 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
494 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
495 /* Read and return EH landing pad IX from input block IB, using descriptors |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
496 in DATA_IN. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
497 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
498 static eh_landing_pad |
145 | 499 input_eh_lp (class lto_input_block *ib, class data_in *data_in, int ix) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
500 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
501 enum LTO_tags tag; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
502 eh_landing_pad lp; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
503 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
504 /* Read the landing pad header. */ |
111 | 505 tag = streamer_read_record_start (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
506 if (tag == LTO_null) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
507 return NULL; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
508 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
509 lto_tag_check_range (tag, LTO_eh_landing_pad, LTO_eh_landing_pad); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
510 |
111 | 511 lp = ggc_cleared_alloc<eh_landing_pad_d> (); |
512 lp->index = streamer_read_hwi (ib); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
513 gcc_assert (lp->index == ix); |
111 | 514 lp->next_lp = (eh_landing_pad) (intptr_t) streamer_read_hwi (ib); |
515 lp->region = (eh_region) (intptr_t) streamer_read_hwi (ib); | |
516 lp->post_landing_pad = stream_read_tree (ib, data_in); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
517 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
518 return lp; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
519 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
520 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
521 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
522 /* After reading the EH regions, pointers to peer and children regions |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
523 are region numbers. This converts all these region numbers into |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
524 real pointers into the rematerialized regions for FN. ROOT_REGION |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
525 is the region number for the root EH region in FN. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
526 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
527 static void |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
528 fixup_eh_region_pointers (struct function *fn, HOST_WIDE_INT root_region) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
529 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
530 unsigned i; |
111 | 531 vec<eh_region, va_gc> *eh_array = fn->eh->region_array; |
532 vec<eh_landing_pad, va_gc> *lp_array = fn->eh->lp_array; | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
533 eh_region r; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
534 eh_landing_pad lp; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
535 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
536 gcc_assert (eh_array && lp_array); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
537 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
538 gcc_assert (root_region >= 0); |
111 | 539 fn->eh->region_tree = (*eh_array)[root_region]; |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
540 |
111 | 541 #define FIXUP_EH_REGION(r) (r) = (*eh_array)[(HOST_WIDE_INT) (intptr_t) (r)] |
542 #define FIXUP_EH_LP(p) (p) = (*lp_array)[(HOST_WIDE_INT) (intptr_t) (p)] | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
543 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
544 /* Convert all the index numbers stored in pointer fields into |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
545 pointers to the corresponding slots in the EH region array. */ |
111 | 546 FOR_EACH_VEC_ELT (*eh_array, i, r) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
547 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
548 /* The array may contain NULL regions. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
549 if (r == NULL) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
550 continue; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
551 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
552 gcc_assert (i == (unsigned) r->index); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
553 FIXUP_EH_REGION (r->outer); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
554 FIXUP_EH_REGION (r->inner); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
555 FIXUP_EH_REGION (r->next_peer); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
556 FIXUP_EH_LP (r->landing_pads); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
557 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
558 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
559 /* Convert all the index numbers stored in pointer fields into |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
560 pointers to the corresponding slots in the EH landing pad array. */ |
111 | 561 FOR_EACH_VEC_ELT (*lp_array, i, lp) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
562 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
563 /* The array may contain NULL landing pads. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
564 if (lp == NULL) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
565 continue; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
566 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
567 gcc_assert (i == (unsigned) lp->index); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
568 FIXUP_EH_LP (lp->next_lp); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
569 FIXUP_EH_REGION (lp->region); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
570 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
571 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
572 #undef FIXUP_EH_REGION |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
573 #undef FIXUP_EH_LP |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
574 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
575 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
576 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
577 /* Initialize EH support. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
578 |
111 | 579 void |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
580 lto_init_eh (void) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
581 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
582 static bool eh_initialized_p = false; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
583 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
584 if (eh_initialized_p) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
585 return; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
586 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
587 /* Contrary to most other FEs, we only initialize EH support when at |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
588 least one of the files in the set contains exception regions in |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
589 it. Since this happens much later than the call to init_eh in |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
590 lang_dependent_init, we have to set flag_exceptions and call |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
591 init_eh again to initialize the EH tables. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
592 flag_exceptions = 1; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
593 init_eh (); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
594 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
595 eh_initialized_p = true; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
596 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
597 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
598 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
599 /* Read the exception table for FN from IB using the data descriptors |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
600 in DATA_IN. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
601 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
602 static void |
145 | 603 input_eh_regions (class lto_input_block *ib, class data_in *data_in, |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
604 struct function *fn) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
605 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
606 HOST_WIDE_INT i, root_region, len; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
607 enum LTO_tags tag; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
608 |
111 | 609 tag = streamer_read_record_start (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
610 if (tag == LTO_null) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
611 return; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
612 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
613 lto_tag_check_range (tag, LTO_eh_table, LTO_eh_table); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
614 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
615 gcc_assert (fn->eh); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
616 |
111 | 617 root_region = streamer_read_hwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
618 gcc_assert (root_region == (int) root_region); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
619 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
620 /* Read the EH region array. */ |
111 | 621 len = streamer_read_hwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
622 gcc_assert (len == (int) len); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
623 if (len > 0) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
624 { |
111 | 625 vec_safe_grow_cleared (fn->eh->region_array, len); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
626 for (i = 0; i < len; i++) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
627 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
628 eh_region r = input_eh_region (ib, data_in, i); |
111 | 629 (*fn->eh->region_array)[i] = r; |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
630 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
631 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
632 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
633 /* Read the landing pads. */ |
111 | 634 len = streamer_read_hwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
635 gcc_assert (len == (int) len); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
636 if (len > 0) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
637 { |
111 | 638 vec_safe_grow_cleared (fn->eh->lp_array, len); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
639 for (i = 0; i < len; i++) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
640 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
641 eh_landing_pad lp = input_eh_lp (ib, data_in, i); |
111 | 642 (*fn->eh->lp_array)[i] = lp; |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
643 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
644 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
645 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
646 /* Read the runtime type data. */ |
111 | 647 len = streamer_read_hwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
648 gcc_assert (len == (int) len); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
649 if (len > 0) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
650 { |
111 | 651 vec_safe_grow_cleared (fn->eh->ttype_data, len); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
652 for (i = 0; i < len; i++) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
653 { |
111 | 654 tree ttype = stream_read_tree (ib, data_in); |
655 (*fn->eh->ttype_data)[i] = ttype; | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
656 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
657 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
658 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
659 /* Read the table of action chains. */ |
111 | 660 len = streamer_read_hwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
661 gcc_assert (len == (int) len); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
662 if (len > 0) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
663 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
664 if (targetm.arm_eabi_unwinder) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
665 { |
111 | 666 vec_safe_grow_cleared (fn->eh->ehspec_data.arm_eabi, len); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
667 for (i = 0; i < len; i++) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
668 { |
111 | 669 tree t = stream_read_tree (ib, data_in); |
670 (*fn->eh->ehspec_data.arm_eabi)[i] = t; | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
671 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
672 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
673 else |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
674 { |
111 | 675 vec_safe_grow_cleared (fn->eh->ehspec_data.other, len); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
676 for (i = 0; i < len; i++) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
677 { |
111 | 678 uchar c = streamer_read_uchar (ib); |
679 (*fn->eh->ehspec_data.other)[i] = c; | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
680 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
681 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
682 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
683 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
684 /* Reconstruct the EH region tree by fixing up the peer/children |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
685 pointers. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
686 fixup_eh_region_pointers (fn, root_region); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
687 |
111 | 688 tag = streamer_read_record_start (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
689 lto_tag_check_range (tag, LTO_null, LTO_null); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
690 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
691 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
692 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
693 /* Make a new basic block with index INDEX in function FN. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
694 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
695 static basic_block |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
696 make_new_block (struct function *fn, unsigned int index) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
697 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
698 basic_block bb = alloc_block (); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
699 bb->index = index; |
111 | 700 SET_BASIC_BLOCK_FOR_FN (fn, index, bb); |
701 n_basic_blocks_for_fn (fn)++; | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
702 return bb; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
703 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
704 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
705 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
706 /* Read the CFG for function FN from input block IB. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
707 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
708 static void |
145 | 709 input_cfg (class lto_input_block *ib, class data_in *data_in, |
111 | 710 struct function *fn) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
711 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
712 unsigned int bb_count; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
713 basic_block p_bb; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
714 unsigned int i; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
715 int index; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
716 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
717 init_empty_tree_cfg_for_function (fn); |
111 | 718 init_ssa_operands (fn); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
719 |
111 | 720 profile_status_for_fn (fn) = streamer_read_enum (ib, profile_status_d, |
721 PROFILE_LAST); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
722 |
111 | 723 bb_count = streamer_read_uhwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
724 |
111 | 725 last_basic_block_for_fn (fn) = bb_count; |
726 if (bb_count > basic_block_info_for_fn (fn)->length ()) | |
727 vec_safe_grow_cleared (basic_block_info_for_fn (fn), bb_count); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
728 |
111 | 729 if (bb_count > label_to_block_map_for_fn (fn)->length ()) |
730 vec_safe_grow_cleared (label_to_block_map_for_fn (fn), bb_count); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
731 |
111 | 732 index = streamer_read_hwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
733 while (index != -1) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
734 { |
111 | 735 basic_block bb = BASIC_BLOCK_FOR_FN (fn, index); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
736 unsigned int edge_count; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
737 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
738 if (bb == NULL) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
739 bb = make_new_block (fn, index); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
740 |
111 | 741 edge_count = streamer_read_uhwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
742 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
743 /* Connect up the CFG. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
744 for (i = 0; i < edge_count; i++) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
745 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
746 unsigned int dest_index; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
747 unsigned int edge_flags; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
748 basic_block dest; |
111 | 749 profile_probability probability; |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
750 edge e; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
751 |
111 | 752 dest_index = streamer_read_uhwi (ib); |
753 probability = profile_probability::stream_in (ib); | |
754 edge_flags = streamer_read_uhwi (ib); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
755 |
111 | 756 dest = BASIC_BLOCK_FOR_FN (fn, dest_index); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
757 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
758 if (dest == NULL) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
759 dest = make_new_block (fn, dest_index); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
760 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
761 e = make_edge (bb, dest, edge_flags); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
762 e->probability = probability; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
763 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
764 |
111 | 765 index = streamer_read_hwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
766 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
767 |
111 | 768 p_bb = ENTRY_BLOCK_PTR_FOR_FN (fn); |
769 index = streamer_read_hwi (ib); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
770 while (index != -1) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
771 { |
111 | 772 basic_block bb = BASIC_BLOCK_FOR_FN (fn, index); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
773 bb->prev_bb = p_bb; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
774 p_bb->next_bb = bb; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
775 p_bb = bb; |
111 | 776 index = streamer_read_hwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
777 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
778 |
111 | 779 /* ??? The cfgloop interface is tied to cfun. */ |
780 gcc_assert (cfun == fn); | |
781 | |
782 /* Input the loop tree. */ | |
783 unsigned n_loops = streamer_read_uhwi (ib); | |
784 if (n_loops == 0) | |
785 return; | |
786 | |
787 struct loops *loops = ggc_cleared_alloc<struct loops> (); | |
788 init_loops_structure (fn, loops, n_loops); | |
789 set_loops_for_fn (fn, loops); | |
790 | |
791 /* Input each loop and associate it with its loop header so | |
792 flow_loops_find can rebuild the loop tree. */ | |
793 for (unsigned i = 1; i < n_loops; ++i) | |
794 { | |
795 int header_index = streamer_read_hwi (ib); | |
796 if (header_index == -1) | |
797 { | |
798 loops->larray->quick_push (NULL); | |
799 continue; | |
800 } | |
801 | |
145 | 802 class loop *loop = alloc_loop (); |
111 | 803 loop->header = BASIC_BLOCK_FOR_FN (fn, header_index); |
804 loop->header->loop_father = loop; | |
805 | |
806 /* Read everything copy_loop_info copies. */ | |
807 loop->estimate_state = streamer_read_enum (ib, loop_estimation, EST_LAST); | |
808 loop->any_upper_bound = streamer_read_hwi (ib); | |
809 if (loop->any_upper_bound) | |
810 loop->nb_iterations_upper_bound = streamer_read_widest_int (ib); | |
811 loop->any_likely_upper_bound = streamer_read_hwi (ib); | |
812 if (loop->any_likely_upper_bound) | |
813 loop->nb_iterations_likely_upper_bound = streamer_read_widest_int (ib); | |
814 loop->any_estimate = streamer_read_hwi (ib); | |
815 if (loop->any_estimate) | |
816 loop->nb_iterations_estimate = streamer_read_widest_int (ib); | |
817 | |
818 /* Read OMP SIMD related info. */ | |
819 loop->safelen = streamer_read_hwi (ib); | |
131 | 820 loop->unroll = streamer_read_hwi (ib); |
145 | 821 loop->owned_clique = streamer_read_hwi (ib); |
111 | 822 loop->dont_vectorize = streamer_read_hwi (ib); |
823 loop->force_vectorize = streamer_read_hwi (ib); | |
824 loop->simduid = stream_read_tree (ib, data_in); | |
825 | |
826 place_new_loop (fn, loop); | |
827 | |
828 /* flow_loops_find doesn't like loops not in the tree, hook them | |
829 all as siblings of the tree root temporarily. */ | |
830 flow_loop_tree_node_add (loops->tree_root, loop); | |
831 } | |
832 | |
833 /* Rebuild the loop tree. */ | |
834 flow_loops_find (loops); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
835 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
836 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
837 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
838 /* Read the SSA names array for function FN from DATA_IN using input |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
839 block IB. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
840 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
841 static void |
145 | 842 input_ssa_names (class lto_input_block *ib, class data_in *data_in, |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
843 struct function *fn) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
844 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
845 unsigned int i, size; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
846 |
111 | 847 size = streamer_read_uhwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
848 init_ssanames (fn, size); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
849 |
111 | 850 i = streamer_read_uhwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
851 while (i) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
852 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
853 tree ssa_name, name; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
854 bool is_default_def; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
855 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
856 /* Skip over the elements that had been freed. */ |
111 | 857 while (SSANAMES (fn)->length () < i) |
858 SSANAMES (fn)->quick_push (NULL_TREE); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
859 |
111 | 860 is_default_def = (streamer_read_uchar (ib) != 0); |
861 name = stream_read_tree (ib, data_in); | |
862 ssa_name = make_ssa_name_fn (fn, name, NULL); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
863 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
864 if (is_default_def) |
111 | 865 { |
866 set_ssa_default_def (cfun, SSA_NAME_VAR (ssa_name), ssa_name); | |
867 SSA_NAME_DEF_STMT (ssa_name) = gimple_build_nop (); | |
868 } | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
869 |
111 | 870 i = streamer_read_uhwi (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
871 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
872 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
873 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
874 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
875 /* Go through all NODE edges and fixup call_stmt pointers |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
876 so they point to STMTS. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
877 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
878 static void |
111 | 879 fixup_call_stmt_edges_1 (struct cgraph_node *node, gimple **stmts, |
880 struct function *fn) | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
881 { |
111 | 882 #define STMT_UID_NOT_IN_RANGE(uid) \ |
883 (gimple_stmt_max_uid (fn) < uid || uid == 0) | |
884 | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
885 struct cgraph_edge *cedge; |
111 | 886 struct ipa_ref *ref = NULL; |
887 unsigned int i; | |
888 | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
889 for (cedge = node->callees; cedge; cedge = cedge->next_callee) |
111 | 890 { |
891 if (STMT_UID_NOT_IN_RANGE (cedge->lto_stmt_uid)) | |
892 fatal_error (input_location, | |
893 "Cgraph edge statement index out of range"); | |
894 cedge->call_stmt = as_a <gcall *> (stmts[cedge->lto_stmt_uid - 1]); | |
145 | 895 cedge->lto_stmt_uid = 0; |
111 | 896 if (!cedge->call_stmt) |
897 fatal_error (input_location, | |
898 "Cgraph edge statement index not found"); | |
899 } | |
63
b7f97abdc517
update gcc from gcc-4.5.0 to gcc-4.6
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
900 for (cedge = node->indirect_calls; cedge; cedge = cedge->next_callee) |
111 | 901 { |
902 if (STMT_UID_NOT_IN_RANGE (cedge->lto_stmt_uid)) | |
903 fatal_error (input_location, | |
904 "Cgraph edge statement index out of range"); | |
905 cedge->call_stmt = as_a <gcall *> (stmts[cedge->lto_stmt_uid - 1]); | |
145 | 906 cedge->lto_stmt_uid = 0; |
111 | 907 if (!cedge->call_stmt) |
908 fatal_error (input_location, "Cgraph edge statement index not found"); | |
909 } | |
910 for (i = 0; node->iterate_reference (i, ref); i++) | |
911 if (ref->lto_stmt_uid) | |
912 { | |
913 if (STMT_UID_NOT_IN_RANGE (ref->lto_stmt_uid)) | |
914 fatal_error (input_location, | |
915 "Reference statement index out of range"); | |
916 ref->stmt = stmts[ref->lto_stmt_uid - 1]; | |
145 | 917 ref->lto_stmt_uid = 0; |
111 | 918 if (!ref->stmt) |
919 fatal_error (input_location, "Reference statement index not found"); | |
920 } | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
921 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
922 |
111 | 923 |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
924 /* Fixup call_stmt pointers in NODE and all clones. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
925 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
926 static void |
111 | 927 fixup_call_stmt_edges (struct cgraph_node *orig, gimple **stmts) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
928 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
929 struct cgraph_node *node; |
111 | 930 struct function *fn; |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
931 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
932 while (orig->clone_of) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
933 orig = orig->clone_of; |
111 | 934 fn = DECL_STRUCT_FUNCTION (orig->decl); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
935 |
111 | 936 if (!orig->thunk.thunk_p) |
937 fixup_call_stmt_edges_1 (orig, stmts, fn); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
938 if (orig->clones) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
939 for (node = orig->clones; node != orig;) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
940 { |
111 | 941 if (!node->thunk.thunk_p) |
942 fixup_call_stmt_edges_1 (node, stmts, fn); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
943 if (node->clones) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
944 node = node->clones; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
945 else if (node->next_sibling_clone) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
946 node = node->next_sibling_clone; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
947 else |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
948 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
949 while (node != orig && !node->next_sibling_clone) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
950 node = node->clone_of; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
951 if (node != orig) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
952 node = node->next_sibling_clone; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
953 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
954 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
955 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
956 |
111 | 957 |
958 /* Input the base body of struct function FN from DATA_IN | |
959 using input block IB. */ | |
960 | |
961 static void | |
145 | 962 input_struct_function_base (struct function *fn, class data_in *data_in, |
963 class lto_input_block *ib) | |
111 | 964 { |
965 struct bitpack_d bp; | |
966 int len; | |
967 | |
968 /* Read the static chain and non-local goto save area. */ | |
969 fn->static_chain_decl = stream_read_tree (ib, data_in); | |
970 fn->nonlocal_goto_save_area = stream_read_tree (ib, data_in); | |
971 | |
972 /* Read all the local symbols. */ | |
973 len = streamer_read_hwi (ib); | |
974 if (len > 0) | |
975 { | |
976 int i; | |
977 vec_safe_grow_cleared (fn->local_decls, len); | |
978 for (i = 0; i < len; i++) | |
979 { | |
980 tree t = stream_read_tree (ib, data_in); | |
981 (*fn->local_decls)[i] = t; | |
982 } | |
983 } | |
984 | |
985 /* Input the current IL state of the function. */ | |
986 fn->curr_properties = streamer_read_uhwi (ib); | |
987 | |
988 /* Read all the attributes for FN. */ | |
989 bp = streamer_read_bitpack (ib); | |
990 fn->is_thunk = bp_unpack_value (&bp, 1); | |
991 fn->has_local_explicit_reg_vars = bp_unpack_value (&bp, 1); | |
992 fn->returns_pcc_struct = bp_unpack_value (&bp, 1); | |
993 fn->returns_struct = bp_unpack_value (&bp, 1); | |
994 fn->can_throw_non_call_exceptions = bp_unpack_value (&bp, 1); | |
995 fn->can_delete_dead_exceptions = bp_unpack_value (&bp, 1); | |
996 fn->always_inline_functions_inlined = bp_unpack_value (&bp, 1); | |
997 fn->after_inlining = bp_unpack_value (&bp, 1); | |
998 fn->stdarg = bp_unpack_value (&bp, 1); | |
999 fn->has_nonlocal_label = bp_unpack_value (&bp, 1); | |
1000 fn->has_forced_label_in_static = bp_unpack_value (&bp, 1); | |
1001 fn->calls_alloca = bp_unpack_value (&bp, 1); | |
1002 fn->calls_setjmp = bp_unpack_value (&bp, 1); | |
145 | 1003 fn->calls_eh_return = bp_unpack_value (&bp, 1); |
111 | 1004 fn->has_force_vectorize_loops = bp_unpack_value (&bp, 1); |
1005 fn->has_simduid_loops = bp_unpack_value (&bp, 1); | |
1006 fn->va_list_fpr_size = bp_unpack_value (&bp, 8); | |
1007 fn->va_list_gpr_size = bp_unpack_value (&bp, 8); | |
1008 fn->last_clique = bp_unpack_value (&bp, sizeof (short) * 8); | |
1009 | |
1010 /* Input the function start and end loci. */ | |
1011 fn->function_start_locus = stream_input_location_now (&bp, data_in); | |
1012 fn->function_end_locus = stream_input_location_now (&bp, data_in); | |
131 | 1013 |
1014 /* Restore the instance discriminators if present. */ | |
1015 int instance_number = bp_unpack_value (&bp, 1); | |
1016 if (instance_number) | |
1017 { | |
1018 instance_number = bp_unpack_value (&bp, sizeof (int) * CHAR_BIT); | |
1019 maybe_create_decl_to_instance_map ()->put (fn->decl, instance_number); | |
1020 } | |
111 | 1021 } |
1022 | |
1023 | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1024 /* Read the body of function FN_DECL from DATA_IN using input block IB. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1025 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1026 static void |
145 | 1027 input_function (tree fn_decl, class data_in *data_in, |
1028 class lto_input_block *ib, class lto_input_block *ib_cfg, | |
1029 cgraph_node *node) | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1030 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1031 struct function *fn; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1032 enum LTO_tags tag; |
111 | 1033 gimple **stmts; |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1034 basic_block bb; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1035 |
111 | 1036 tag = streamer_read_record_start (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1037 lto_tag_check (tag, LTO_function); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1038 |
111 | 1039 /* Read decls for parameters and args. */ |
1040 DECL_RESULT (fn_decl) = stream_read_tree (ib, data_in); | |
1041 DECL_ARGUMENTS (fn_decl) = streamer_read_chain (ib, data_in); | |
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1042 |
111 | 1043 /* Read debug args if available. */ |
1044 unsigned n_debugargs = streamer_read_uhwi (ib); | |
1045 if (n_debugargs) | |
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1046 { |
111 | 1047 vec<tree, va_gc> **debugargs = decl_debug_args_insert (fn_decl); |
1048 vec_safe_grow (*debugargs, n_debugargs); | |
1049 for (unsigned i = 0; i < n_debugargs; ++i) | |
1050 (**debugargs)[i] = stream_read_tree (ib, data_in); | |
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1051 } |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1052 |
111 | 1053 /* Read the tree of lexical scopes for the function. */ |
1054 DECL_INITIAL (fn_decl) = stream_read_tree (ib, data_in); | |
1055 unsigned block_leaf_count = streamer_read_uhwi (ib); | |
1056 while (block_leaf_count--) | |
1057 stream_read_tree (ib, data_in); | |
1058 | |
1059 if (!streamer_read_uhwi (ib)) | |
1060 return; | |
1061 | |
1062 push_struct_function (fn_decl); | |
1063 fn = DECL_STRUCT_FUNCTION (fn_decl); | |
1064 init_tree_ssa (fn); | |
1065 /* We input IL in SSA form. */ | |
1066 cfun->gimple_df->in_ssa_p = true; | |
1067 | |
1068 gimple_register_cfg_hooks (); | |
1069 | |
1070 input_struct_function_base (fn, data_in, ib); | |
1071 input_cfg (ib_cfg, data_in, fn); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1072 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1073 /* Read all the SSA names. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1074 input_ssa_names (ib, data_in, fn); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1075 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1076 /* Read the exception handling regions in the function. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1077 input_eh_regions (ib, data_in, fn); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1078 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1079 gcc_assert (DECL_INITIAL (fn_decl)); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1080 DECL_SAVED_TREE (fn_decl) = NULL_TREE; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1081 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1082 /* Read all the basic blocks. */ |
111 | 1083 tag = streamer_read_record_start (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1084 while (tag) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1085 { |
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1086 input_bb (ib, tag, data_in, fn, |
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1087 node->count_materialization_scale); |
111 | 1088 tag = streamer_read_record_start (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1089 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1090 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1091 /* Fix up the call statements that are mentioned in the callgraph |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1092 edges. */ |
111 | 1093 set_gimple_stmt_max_uid (cfun, 0); |
1094 FOR_ALL_BB_FN (bb, cfun) | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1095 { |
111 | 1096 gimple_stmt_iterator gsi; |
1097 for (gsi = gsi_start_phis (bb); !gsi_end_p (gsi); gsi_next (&gsi)) | |
1098 { | |
1099 gimple *stmt = gsi_stmt (gsi); | |
1100 gimple_set_uid (stmt, inc_gimple_stmt_max_uid (cfun)); | |
1101 } | |
1102 for (gsi = gsi_start_bb (bb); !gsi_end_p (gsi); gsi_next (&gsi)) | |
1103 { | |
1104 gimple *stmt = gsi_stmt (gsi); | |
1105 gimple_set_uid (stmt, inc_gimple_stmt_max_uid (cfun)); | |
1106 } | |
1107 } | |
1108 stmts = (gimple **) xcalloc (gimple_stmt_max_uid (fn), sizeof (gimple *)); | |
1109 FOR_ALL_BB_FN (bb, cfun) | |
1110 { | |
1111 gimple_stmt_iterator bsi = gsi_start_phis (bb); | |
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1112 while (!gsi_end_p (bsi)) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1113 { |
111 | 1114 gimple *stmt = gsi_stmt (bsi); |
1115 gsi_next (&bsi); | |
1116 stmts[gimple_uid (stmt)] = stmt; | |
1117 } | |
1118 bsi = gsi_start_bb (bb); | |
1119 while (!gsi_end_p (bsi)) | |
1120 { | |
1121 gimple *stmt = gsi_stmt (bsi); | |
1122 bool remove = false; | |
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1123 /* If we're recompiling LTO objects with debug stmts but |
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1124 we're not supposed to have debug stmts, remove them now. |
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1125 We can't remove them earlier because this would cause uid |
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1126 mismatches in fixups, but we can do it at this point, as |
111 | 1127 long as debug stmts don't require fixups. |
1128 Similarly remove all IFN_*SAN_* internal calls */ | |
1129 if (!flag_wpa) | |
1130 { | |
131 | 1131 if (is_gimple_debug (stmt) |
1132 && (gimple_debug_nonbind_marker_p (stmt) | |
1133 ? !MAY_HAVE_DEBUG_MARKER_STMTS | |
1134 : !MAY_HAVE_DEBUG_BIND_STMTS)) | |
111 | 1135 remove = true; |
145 | 1136 /* In case the linemap overflows locations can be dropped |
1137 to zero. Thus do not keep nonsensical inline entry markers | |
1138 we'd later ICE on. */ | |
1139 tree block; | |
1140 if (gimple_debug_inline_entry_p (stmt) | |
1141 && (((block = gimple_block (stmt)) | |
1142 && !inlined_function_outer_scope_p (block)) | |
1143 || !debug_inline_points)) | |
1144 remove = true; | |
111 | 1145 if (is_gimple_call (stmt) |
1146 && gimple_call_internal_p (stmt)) | |
1147 { | |
131 | 1148 bool replace = false; |
111 | 1149 switch (gimple_call_internal_fn (stmt)) |
1150 { | |
1151 case IFN_UBSAN_NULL: | |
1152 if ((flag_sanitize | |
1153 & (SANITIZE_NULL | SANITIZE_ALIGNMENT)) == 0) | |
131 | 1154 replace = true; |
111 | 1155 break; |
1156 case IFN_UBSAN_BOUNDS: | |
1157 if ((flag_sanitize & SANITIZE_BOUNDS) == 0) | |
131 | 1158 replace = true; |
111 | 1159 break; |
1160 case IFN_UBSAN_VPTR: | |
1161 if ((flag_sanitize & SANITIZE_VPTR) == 0) | |
131 | 1162 replace = true; |
111 | 1163 break; |
1164 case IFN_UBSAN_OBJECT_SIZE: | |
1165 if ((flag_sanitize & SANITIZE_OBJECT_SIZE) == 0) | |
131 | 1166 replace = true; |
111 | 1167 break; |
1168 case IFN_UBSAN_PTR: | |
1169 if ((flag_sanitize & SANITIZE_POINTER_OVERFLOW) == 0) | |
131 | 1170 replace = true; |
111 | 1171 break; |
1172 case IFN_ASAN_MARK: | |
1173 if ((flag_sanitize & SANITIZE_ADDRESS) == 0) | |
131 | 1174 replace = true; |
111 | 1175 break; |
1176 case IFN_TSAN_FUNC_EXIT: | |
1177 if ((flag_sanitize & SANITIZE_THREAD) == 0) | |
131 | 1178 replace = true; |
111 | 1179 break; |
1180 default: | |
1181 break; | |
1182 } | |
131 | 1183 if (replace) |
1184 { | |
1185 gimple_call_set_internal_fn (as_a <gcall *> (stmt), | |
1186 IFN_NOP); | |
1187 update_stmt (stmt); | |
1188 } | |
111 | 1189 } |
1190 } | |
1191 if (remove) | |
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1192 { |
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1193 gimple_stmt_iterator gsi = bsi; |
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1194 gsi_next (&bsi); |
111 | 1195 unlink_stmt_vdef (stmt); |
1196 release_defs (stmt); | |
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1197 gsi_remove (&gsi, true); |
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1198 } |
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1199 else |
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1200 { |
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1201 gsi_next (&bsi); |
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1202 stmts[gimple_uid (stmt)] = stmt; |
131 | 1203 |
1204 /* Remember that the input function has begin stmt | |
1205 markers, so that we know to expect them when emitting | |
1206 debug info. */ | |
1207 if (!cfun->debug_nonbind_markers | |
1208 && gimple_debug_nonbind_marker_p (stmt)) | |
1209 cfun->debug_nonbind_markers = true; | |
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1210 } |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1211 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1212 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1213 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1214 /* Set the gimple body to the statement sequence in the entry |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1215 basic block. FIXME lto, this is fairly hacky. The existence |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1216 of a gimple body is used by the cgraph routines, but we should |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1217 really use the presence of the CFG. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1218 { |
111 | 1219 edge_iterator ei = ei_start (ENTRY_BLOCK_PTR_FOR_FN (cfun)->succs); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1220 gimple_set_body (fn_decl, bb_seq (ei_edge (ei)->dest)); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1221 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1222 |
131 | 1223 update_max_bb_count (); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1224 fixup_call_stmt_edges (node, stmts); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1225 execute_all_ipa_stmt_fixups (node, stmts); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1226 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1227 free_dominance_info (CDI_DOMINATORS); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1228 free_dominance_info (CDI_POST_DOMINATORS); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1229 free (stmts); |
111 | 1230 pop_cfun (); |
1231 } | |
1232 | |
1233 /* Read the body of function FN_DECL from DATA_IN using input block IB. */ | |
1234 | |
1235 static void | |
145 | 1236 input_constructor (tree var, class data_in *data_in, |
1237 class lto_input_block *ib) | |
111 | 1238 { |
1239 DECL_INITIAL (var) = stream_read_tree (ib, data_in); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1240 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1241 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1242 |
111 | 1243 /* Read the body from DATA for function NODE and fill it in. |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1244 FILE_DATA are the global decls and types. SECTION_TYPE is either |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1245 LTO_section_function_body or LTO_section_static_initializer. If |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1246 section type is LTO_section_function_body, FN must be the decl for |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1247 that function. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1248 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1249 static void |
111 | 1250 lto_read_body_or_constructor (struct lto_file_decl_data *file_data, struct symtab_node *node, |
1251 const char *data, enum lto_section_type section_type) | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1252 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1253 const struct lto_function_header *header; |
145 | 1254 class data_in *data_in; |
111 | 1255 int cfg_offset; |
1256 int main_offset; | |
1257 int string_offset; | |
1258 tree fn_decl = node->decl; | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1259 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1260 header = (const struct lto_function_header *) data; |
111 | 1261 if (TREE_CODE (node->decl) == FUNCTION_DECL) |
1262 { | |
1263 cfg_offset = sizeof (struct lto_function_header); | |
1264 main_offset = cfg_offset + header->cfg_size; | |
1265 string_offset = main_offset + header->main_size; | |
1266 } | |
1267 else | |
1268 { | |
1269 main_offset = sizeof (struct lto_function_header); | |
1270 string_offset = main_offset + header->main_size; | |
1271 } | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1272 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1273 data_in = lto_data_in_create (file_data, data + string_offset, |
111 | 1274 header->string_size, vNULL); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1275 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1276 if (section_type == LTO_section_function_body) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1277 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1278 struct lto_in_decl_state *decl_state; |
111 | 1279 unsigned from; |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1280 |
111 | 1281 gcc_checking_assert (node); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1282 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1283 /* Use the function's decl state. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1284 decl_state = lto_get_function_in_decl_state (file_data, fn_decl); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1285 gcc_assert (decl_state); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1286 file_data->current_decl_state = decl_state; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1287 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1288 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1289 /* Set up the struct function. */ |
111 | 1290 from = data_in->reader_cache->nodes.length (); |
1291 lto_input_block ib_main (data + main_offset, header->main_size, | |
1292 file_data->mode_table); | |
1293 if (TREE_CODE (node->decl) == FUNCTION_DECL) | |
1294 { | |
1295 lto_input_block ib_cfg (data + cfg_offset, header->cfg_size, | |
1296 file_data->mode_table); | |
145 | 1297 input_function (fn_decl, data_in, &ib_main, &ib_cfg, |
1298 dyn_cast <cgraph_node *>(node)); | |
111 | 1299 } |
1300 else | |
1301 input_constructor (fn_decl, data_in, &ib_main); | |
1302 data_in->location_cache.apply_location_cache (); | |
1303 /* And fixup types we streamed locally. */ | |
1304 { | |
1305 struct streamer_tree_cache_d *cache = data_in->reader_cache; | |
1306 unsigned len = cache->nodes.length (); | |
1307 unsigned i; | |
1308 for (i = len; i-- > from;) | |
1309 { | |
1310 tree t = streamer_tree_cache_get_tree (cache, i); | |
1311 if (t == NULL_TREE) | |
1312 continue; | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1313 |
111 | 1314 if (TYPE_P (t)) |
1315 { | |
1316 gcc_assert (TYPE_CANONICAL (t) == NULL_TREE); | |
1317 if (type_with_alias_set_p (t) | |
1318 && canonical_type_used_p (t)) | |
1319 TYPE_CANONICAL (t) = TYPE_MAIN_VARIANT (t); | |
1320 if (TYPE_MAIN_VARIANT (t) != t) | |
1321 { | |
1322 gcc_assert (TYPE_NEXT_VARIANT (t) == NULL_TREE); | |
1323 TYPE_NEXT_VARIANT (t) | |
1324 = TYPE_NEXT_VARIANT (TYPE_MAIN_VARIANT (t)); | |
1325 TYPE_NEXT_VARIANT (TYPE_MAIN_VARIANT (t)) = t; | |
1326 } | |
1327 } | |
1328 } | |
1329 } | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1330 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1331 /* Restore decl state */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1332 file_data->current_decl_state = file_data->global_decl_state; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1333 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1334 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1335 lto_data_in_delete (data_in); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1336 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1337 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1338 |
111 | 1339 /* Read the body of NODE using DATA. FILE_DATA holds the global |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1340 decls and types. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1341 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1342 void |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1343 lto_input_function_body (struct lto_file_decl_data *file_data, |
111 | 1344 struct cgraph_node *node, const char *data) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1345 { |
111 | 1346 lto_read_body_or_constructor (file_data, node, data, LTO_section_function_body); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1347 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1348 |
111 | 1349 /* Read the body of NODE using DATA. FILE_DATA holds the global |
1350 decls and types. */ | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1351 |
111 | 1352 void |
1353 lto_input_variable_constructor (struct lto_file_decl_data *file_data, | |
1354 struct varpool_node *node, const char *data) | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1355 { |
111 | 1356 lto_read_body_or_constructor (file_data, node, data, LTO_section_function_body); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1357 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1358 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1359 |
111 | 1360 /* Queue of acummulated decl -> DIE mappings. Similar to locations those |
1361 are only applied to prevailing tree nodes during tree merging. */ | |
1362 vec<dref_entry> dref_queue; | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1363 |
111 | 1364 /* Read the physical representation of a tree node EXPR from |
1365 input block IB using the per-file context in DATA_IN. */ | |
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1366 |
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
1367 static void |
145 | 1368 lto_read_tree_1 (class lto_input_block *ib, class data_in *data_in, tree expr) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1369 { |
111 | 1370 /* Read all the bitfield values in EXPR. Note that for LTO, we |
1371 only write language-independent bitfields, so no more unpacking is | |
1372 needed. */ | |
1373 streamer_read_tree_bitfields (ib, data_in, expr); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1374 |
111 | 1375 /* Read all the pointer fields in EXPR. */ |
1376 streamer_read_tree_body (ib, data_in, expr); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1377 |
111 | 1378 /* Read any LTO-specific data not read by the tree streamer. */ |
1379 if (DECL_P (expr) | |
1380 && TREE_CODE (expr) != FUNCTION_DECL | |
1381 && TREE_CODE (expr) != TRANSLATION_UNIT_DECL) | |
1382 DECL_INITIAL (expr) = stream_read_tree (ib, data_in); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1383 |
111 | 1384 /* Stream references to early generated DIEs. Keep in sync with the |
1385 trees handled in dwarf2out_register_external_die. */ | |
1386 if ((DECL_P (expr) | |
1387 && TREE_CODE (expr) != FIELD_DECL | |
1388 && TREE_CODE (expr) != DEBUG_EXPR_DECL | |
1389 && TREE_CODE (expr) != TYPE_DECL) | |
1390 || TREE_CODE (expr) == BLOCK) | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1391 { |
111 | 1392 const char *str = streamer_read_string (data_in, ib); |
1393 if (str) | |
1394 { | |
1395 unsigned HOST_WIDE_INT off = streamer_read_uhwi (ib); | |
1396 dref_entry e = { expr, str, off }; | |
1397 dref_queue.safe_push (e); | |
1398 } | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1399 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1400 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1401 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1402 /* Read the physical representation of a tree node with tag TAG from |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1403 input block IB using the per-file context in DATA_IN. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1404 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1405 static tree |
145 | 1406 lto_read_tree (class lto_input_block *ib, class data_in *data_in, |
111 | 1407 enum LTO_tags tag, hashval_t hash) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1408 { |
111 | 1409 /* Instantiate a new tree node. */ |
1410 tree result = streamer_alloc_tree (ib, data_in, tag); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1411 |
111 | 1412 /* Enter RESULT in the reader cache. This will make RESULT |
1413 available so that circular references in the rest of the tree | |
1414 structure can be resolved in subsequent calls to stream_read_tree. */ | |
1415 streamer_tree_cache_append (data_in->reader_cache, result, hash); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1416 |
111 | 1417 lto_read_tree_1 (ib, data_in, result); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1418 |
111 | 1419 /* end_marker = */ streamer_read_uchar (ib); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1420 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1421 return result; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1422 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1423 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1424 |
111 | 1425 /* Populate the reader cache with trees materialized from the SCC |
1426 following in the IB, DATA_IN stream. */ | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1427 |
111 | 1428 hashval_t |
145 | 1429 lto_input_scc (class lto_input_block *ib, class data_in *data_in, |
111 | 1430 unsigned *len, unsigned *entry_len) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1431 { |
111 | 1432 /* A blob of unnamed tree nodes, fill the cache from it and |
1433 recurse. */ | |
1434 unsigned size = streamer_read_uhwi (ib); | |
1435 hashval_t scc_hash = streamer_read_uhwi (ib); | |
1436 unsigned scc_entry_len = 1; | |
1437 | |
1438 if (size == 1) | |
1439 { | |
1440 enum LTO_tags tag = streamer_read_record_start (ib); | |
1441 lto_input_tree_1 (ib, data_in, tag, scc_hash); | |
1442 } | |
1443 else | |
1444 { | |
1445 unsigned int first = data_in->reader_cache->nodes.length (); | |
1446 tree result; | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1447 |
111 | 1448 scc_entry_len = streamer_read_uhwi (ib); |
1449 | |
1450 /* Materialize size trees by reading their headers. */ | |
1451 for (unsigned i = 0; i < size; ++i) | |
1452 { | |
1453 enum LTO_tags tag = streamer_read_record_start (ib); | |
1454 if (tag == LTO_null | |
1455 || (tag >= LTO_field_decl_ref && tag <= LTO_global_decl_ref) | |
1456 || tag == LTO_tree_pickle_reference | |
1457 || tag == LTO_integer_cst | |
1458 || tag == LTO_tree_scc) | |
1459 gcc_unreachable (); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1460 |
111 | 1461 result = streamer_alloc_tree (ib, data_in, tag); |
1462 streamer_tree_cache_append (data_in->reader_cache, result, 0); | |
1463 } | |
1464 | |
1465 /* Read the tree bitpacks and references. */ | |
1466 for (unsigned i = 0; i < size; ++i) | |
1467 { | |
1468 result = streamer_tree_cache_get_tree (data_in->reader_cache, | |
1469 first + i); | |
1470 lto_read_tree_1 (ib, data_in, result); | |
1471 /* end_marker = */ streamer_read_uchar (ib); | |
1472 } | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1473 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1474 |
111 | 1475 *len = size; |
1476 *entry_len = scc_entry_len; | |
1477 return scc_hash; | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1478 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1479 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1480 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1481 /* Read a tree from input block IB using the per-file context in |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1482 DATA_IN. This context is used, for example, to resolve references |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1483 to previously read nodes. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1484 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1485 tree |
145 | 1486 lto_input_tree_1 (class lto_input_block *ib, class data_in *data_in, |
111 | 1487 enum LTO_tags tag, hashval_t hash) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1488 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1489 tree result; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1490 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1491 gcc_assert ((unsigned) tag < (unsigned) LTO_NUM_TAGS); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1492 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1493 if (tag == LTO_null) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1494 result = NULL_TREE; |
111 | 1495 else if (tag >= LTO_field_decl_ref && tag <= LTO_namelist_decl_ref) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1496 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1497 /* If TAG is a reference to an indexable tree, the next value |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1498 in IB is the index into the table where we expect to find |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1499 that tree. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1500 result = lto_input_tree_ref (ib, data_in, cfun, tag); |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1501 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1502 else if (tag == LTO_tree_pickle_reference) |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1503 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1504 /* If TAG is a reference to a previously read tree, look it up in |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1505 the reader cache. */ |
111 | 1506 result = streamer_get_pickled_tree (ib, data_in); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1507 } |
111 | 1508 else if (tag == LTO_integer_cst) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1509 { |
111 | 1510 /* For shared integer constants in singletons we can use the |
1511 existing tree integer constant merging code. */ | |
1512 tree type = stream_read_tree (ib, data_in); | |
1513 unsigned HOST_WIDE_INT len = streamer_read_uhwi (ib); | |
1514 unsigned HOST_WIDE_INT i; | |
1515 HOST_WIDE_INT a[WIDE_INT_MAX_ELTS]; | |
1516 | |
1517 for (i = 0; i < len; i++) | |
1518 a[i] = streamer_read_hwi (ib); | |
1519 gcc_assert (TYPE_PRECISION (type) <= MAX_BITSIZE_MODE_ANY_INT); | |
1520 result = wide_int_to_tree (type, wide_int::from_array | |
1521 (a, len, TYPE_PRECISION (type))); | |
1522 streamer_tree_cache_append (data_in->reader_cache, result, hash); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1523 } |
111 | 1524 else if (tag == LTO_tree_scc) |
1525 gcc_unreachable (); | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1526 else |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1527 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1528 /* Otherwise, materialize a new node from IB. */ |
111 | 1529 result = lto_read_tree (ib, data_in, tag, hash); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1530 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1531 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1532 return result; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1533 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1534 |
111 | 1535 tree |
145 | 1536 lto_input_tree (class lto_input_block *ib, class data_in *data_in) |
111 | 1537 { |
1538 enum LTO_tags tag; | |
1539 | |
1540 /* Input and skip SCCs. */ | |
1541 while ((tag = streamer_read_record_start (ib)) == LTO_tree_scc) | |
1542 { | |
1543 unsigned len, entry_len; | |
1544 lto_input_scc (ib, data_in, &len, &entry_len); | |
1545 | |
1546 /* Register DECLs with the debuginfo machinery. */ | |
1547 while (!dref_queue.is_empty ()) | |
1548 { | |
1549 dref_entry e = dref_queue.pop (); | |
1550 debug_hooks->register_external_die (e.decl, e.sym, e.off); | |
1551 } | |
1552 } | |
1553 return lto_input_tree_1 (ib, data_in, tag, 0); | |
1554 } | |
1555 | |
1556 | |
1557 /* Input toplevel asms. */ | |
1558 | |
1559 void | |
1560 lto_input_toplevel_asms (struct lto_file_decl_data *file_data, int order_base) | |
1561 { | |
1562 size_t len; | |
145 | 1563 const char *data |
1564 = lto_get_summary_section_data (file_data, LTO_section_asm, &len); | |
111 | 1565 const struct lto_simple_header_with_strings *header |
1566 = (const struct lto_simple_header_with_strings *) data; | |
1567 int string_offset; | |
145 | 1568 class data_in *data_in; |
111 | 1569 tree str; |
1570 | |
1571 if (! data) | |
1572 return; | |
1573 | |
1574 string_offset = sizeof (*header) + header->main_size; | |
1575 | |
1576 lto_input_block ib (data + sizeof (*header), header->main_size, | |
1577 file_data->mode_table); | |
1578 | |
1579 data_in = lto_data_in_create (file_data, data + string_offset, | |
1580 header->string_size, vNULL); | |
1581 | |
1582 while ((str = streamer_read_string_cst (data_in, &ib))) | |
1583 { | |
1584 asm_node *node = symtab->finalize_toplevel_asm (str); | |
1585 node->order = streamer_read_hwi (&ib) + order_base; | |
1586 if (node->order >= symtab->order) | |
1587 symtab->order = node->order + 1; | |
1588 } | |
1589 | |
1590 lto_data_in_delete (data_in); | |
1591 | |
1592 lto_free_section_data (file_data, LTO_section_asm, NULL, data, len); | |
1593 } | |
1594 | |
1595 | |
1596 /* Input mode table. */ | |
1597 | |
1598 void | |
1599 lto_input_mode_table (struct lto_file_decl_data *file_data) | |
1600 { | |
1601 size_t len; | |
145 | 1602 const char *data |
1603 = lto_get_summary_section_data (file_data, LTO_section_mode_table, &len); | |
111 | 1604 if (! data) |
1605 { | |
1606 internal_error ("cannot read LTO mode table from %s", | |
1607 file_data->file_name); | |
1608 return; | |
1609 } | |
1610 | |
1611 unsigned char *table = ggc_cleared_vec_alloc<unsigned char> (1 << 8); | |
1612 file_data->mode_table = table; | |
1613 const struct lto_simple_header_with_strings *header | |
1614 = (const struct lto_simple_header_with_strings *) data; | |
1615 int string_offset; | |
145 | 1616 class data_in *data_in; |
111 | 1617 string_offset = sizeof (*header) + header->main_size; |
1618 | |
1619 lto_input_block ib (data + sizeof (*header), header->main_size, NULL); | |
1620 data_in = lto_data_in_create (file_data, data + string_offset, | |
1621 header->string_size, vNULL); | |
1622 bitpack_d bp = streamer_read_bitpack (&ib); | |
1623 | |
1624 table[VOIDmode] = VOIDmode; | |
1625 table[BLKmode] = BLKmode; | |
1626 unsigned int m; | |
1627 while ((m = bp_unpack_value (&bp, 8)) != VOIDmode) | |
1628 { | |
1629 enum mode_class mclass | |
1630 = bp_unpack_enum (&bp, mode_class, MAX_MODE_CLASS); | |
131 | 1631 poly_uint16 size = bp_unpack_poly_value (&bp, 16); |
1632 poly_uint16 prec = bp_unpack_poly_value (&bp, 16); | |
111 | 1633 machine_mode inner = (machine_mode) bp_unpack_value (&bp, 8); |
131 | 1634 poly_uint16 nunits = bp_unpack_poly_value (&bp, 16); |
111 | 1635 unsigned int ibit = 0, fbit = 0; |
1636 unsigned int real_fmt_len = 0; | |
1637 const char *real_fmt_name = NULL; | |
1638 switch (mclass) | |
1639 { | |
1640 case MODE_FRACT: | |
1641 case MODE_UFRACT: | |
1642 case MODE_ACCUM: | |
1643 case MODE_UACCUM: | |
1644 ibit = bp_unpack_value (&bp, 8); | |
1645 fbit = bp_unpack_value (&bp, 8); | |
1646 break; | |
1647 case MODE_FLOAT: | |
1648 case MODE_DECIMAL_FLOAT: | |
1649 real_fmt_name = bp_unpack_indexed_string (data_in, &bp, | |
1650 &real_fmt_len); | |
1651 break; | |
1652 default: | |
1653 break; | |
1654 } | |
1655 /* First search just the GET_CLASS_NARROWEST_MODE to wider modes, | |
1656 if not found, fallback to all modes. */ | |
1657 int pass; | |
1658 for (pass = 0; pass < 2; pass++) | |
1659 for (machine_mode mr = pass ? VOIDmode | |
1660 : GET_CLASS_NARROWEST_MODE (mclass); | |
1661 pass ? mr < MAX_MACHINE_MODE : mr != VOIDmode; | |
1662 pass ? mr = (machine_mode) (mr + 1) | |
1663 : mr = GET_MODE_WIDER_MODE (mr).else_void ()) | |
1664 if (GET_MODE_CLASS (mr) != mclass | |
131 | 1665 || maybe_ne (GET_MODE_SIZE (mr), size) |
1666 || maybe_ne (GET_MODE_PRECISION (mr), prec) | |
111 | 1667 || (inner == m |
1668 ? GET_MODE_INNER (mr) != mr | |
1669 : GET_MODE_INNER (mr) != table[(int) inner]) | |
1670 || GET_MODE_IBIT (mr) != ibit | |
1671 || GET_MODE_FBIT (mr) != fbit | |
131 | 1672 || maybe_ne (GET_MODE_NUNITS (mr), nunits)) |
111 | 1673 continue; |
1674 else if ((mclass == MODE_FLOAT || mclass == MODE_DECIMAL_FLOAT) | |
1675 && strcmp (REAL_MODE_FORMAT (mr)->name, real_fmt_name) != 0) | |
1676 continue; | |
1677 else | |
1678 { | |
1679 table[m] = mr; | |
1680 pass = 2; | |
1681 break; | |
1682 } | |
1683 unsigned int mname_len; | |
1684 const char *mname = bp_unpack_indexed_string (data_in, &bp, &mname_len); | |
1685 if (pass == 2) | |
1686 { | |
1687 switch (mclass) | |
1688 { | |
131 | 1689 case MODE_VECTOR_BOOL: |
111 | 1690 case MODE_VECTOR_INT: |
1691 case MODE_VECTOR_FLOAT: | |
1692 case MODE_VECTOR_FRACT: | |
1693 case MODE_VECTOR_UFRACT: | |
1694 case MODE_VECTOR_ACCUM: | |
1695 case MODE_VECTOR_UACCUM: | |
1696 /* For unsupported vector modes just use BLKmode, | |
1697 if the scalar mode is supported. */ | |
1698 if (table[(int) inner] != VOIDmode) | |
1699 { | |
1700 table[m] = BLKmode; | |
1701 break; | |
1702 } | |
1703 /* FALLTHRU */ | |
1704 default: | |
145 | 1705 /* This is only used for offloading-target compilations and |
1706 is a user-facing error. Give a better error message for | |
1707 the common modes; see also mode-classes.def. */ | |
1708 if (mclass == MODE_FLOAT) | |
1709 fatal_error (UNKNOWN_LOCATION, | |
1710 "%s - %u-bit-precision floating-point numbers " | |
1711 "unsupported (mode %qs)", TARGET_MACHINE, | |
1712 prec.to_constant (), mname); | |
1713 else if (mclass == MODE_DECIMAL_FLOAT) | |
1714 fatal_error (UNKNOWN_LOCATION, | |
1715 "%s - %u-bit-precision decimal floating-point " | |
1716 "numbers unsupported (mode %qs)", TARGET_MACHINE, | |
1717 prec.to_constant (), mname); | |
1718 else if (mclass == MODE_COMPLEX_FLOAT) | |
1719 fatal_error (UNKNOWN_LOCATION, | |
1720 "%s - %u-bit-precision complex floating-point " | |
1721 "numbers unsupported (mode %qs)", TARGET_MACHINE, | |
1722 prec.to_constant (), mname); | |
1723 else if (mclass == MODE_INT) | |
1724 fatal_error (UNKNOWN_LOCATION, | |
1725 "%s - %u-bit integer numbers unsupported (mode " | |
1726 "%qs)", TARGET_MACHINE, prec.to_constant (), mname); | |
1727 else | |
1728 fatal_error (UNKNOWN_LOCATION, "%s - unsupported mode %qs", | |
1729 TARGET_MACHINE, mname); | |
111 | 1730 break; |
1731 } | |
1732 } | |
1733 } | |
1734 lto_data_in_delete (data_in); | |
1735 | |
1736 lto_free_section_data (file_data, LTO_section_mode_table, NULL, data, len); | |
1737 } | |
1738 | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1739 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1740 /* Initialization for the LTO reader. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1741 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1742 void |
111 | 1743 lto_reader_init (void) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1744 { |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1745 lto_streamer_init (); |
111 | 1746 file_name_hash_table |
145 | 1747 = new hash_table<string_slot_hasher> (37); |
1748 string_slot_allocator = new object_allocator <struct string_slot> | |
1749 ("line map file name hash"); | |
1750 gcc_obstack_init (&file_name_obstack); | |
1751 } | |
1752 | |
1753 /* Free hash table used to stream in location file names. */ | |
1754 | |
1755 void | |
1756 lto_free_file_name_hash (void) | |
1757 { | |
1758 delete file_name_hash_table; | |
1759 file_name_hash_table = NULL; | |
1760 delete string_slot_allocator; | |
1761 string_slot_allocator = NULL; | |
1762 /* file_name_obstack must stay allocated since it is referred to by | |
1763 line map table. */ | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1764 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1765 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1766 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1767 /* Create a new data_in object for FILE_DATA. STRINGS is the string |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1768 table to use with LEN strings. RESOLUTIONS is the vector of linker |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1769 resolutions (NULL if not using a linker plugin). */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1770 |
145 | 1771 class data_in * |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1772 lto_data_in_create (struct lto_file_decl_data *file_data, const char *strings, |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1773 unsigned len, |
111 | 1774 vec<ld_plugin_symbol_resolution_t> resolutions) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1775 { |
145 | 1776 class data_in *data_in = new (class data_in); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1777 data_in->file_data = file_data; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1778 data_in->strings = strings; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1779 data_in->strings_len = len; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1780 data_in->globals_resolution = resolutions; |
111 | 1781 data_in->reader_cache = streamer_tree_cache_create (false, false, true); |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1782 return data_in; |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1783 } |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1784 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1785 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1786 /* Remove DATA_IN. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1787 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1788 void |
145 | 1789 lto_data_in_delete (class data_in *data_in) |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1790 { |
111 | 1791 data_in->globals_resolution.release (); |
1792 streamer_tree_cache_delete (data_in->reader_cache); | |
1793 delete data_in; | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1794 } |