Line data Source code
1 : /* Liveness for SSA trees.
2 : Copyright (C) 2003-2026 Free Software Foundation, Inc.
3 : Contributed by Andrew MacLeod <amacleod@redhat.com>
4 :
5 : This file is part of GCC.
6 :
7 : GCC is free software; you can redistribute it and/or modify
8 : it under the terms of the GNU General Public License as published by
9 : the Free Software Foundation; either version 3, or (at your option)
10 : any later version.
11 :
12 : GCC is distributed in the hope that it will be useful,
13 : but WITHOUT ANY WARRANTY; without even the implied warranty of
14 : MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 : GNU General Public License for more details.
16 :
17 : You should have received a copy of the GNU General Public License
18 : along with GCC; see the file COPYING3. If not see
19 : <http://www.gnu.org/licenses/>. */
20 :
21 : #include "config.h"
22 : #include "system.h"
23 : #include "coretypes.h"
24 : #include "backend.h"
25 : #include "rtl.h"
26 : #include "tree.h"
27 : #include "gimple.h"
28 : #include "timevar.h"
29 : #include "ssa.h"
30 : #include "cgraph.h"
31 : #include "gimple-pretty-print.h"
32 : #include "diagnostic-core.h"
33 : #include "gimple-iterator.h"
34 : #include "tree-dfa.h"
35 : #include "dumpfile.h"
36 : #include "tree-ssa-live.h"
37 : #include "debug.h"
38 : #include "tree-ssa.h"
39 : #include "ipa-utils.h"
40 : #include "cfgloop.h"
41 : #include "stringpool.h"
42 : #include "attribs.h"
43 : #include "optinfo.h"
44 : #include "gimple-walk.h"
45 : #include "cfganal.h"
46 : #include "tree-cfg.h"
47 :
48 : static void verify_live_on_entry (tree_live_info_p);
49 :
50 :
51 : /* VARMAP maintains a mapping from SSA version number to real variables.
52 :
53 : All SSA_NAMES are divided into partitions. Initially each ssa_name is the
54 : only member of it's own partition. Coalescing will attempt to group any
55 : ssa_names which occur in a copy or in a PHI node into the same partition.
56 :
57 : At the end of out-of-ssa, each partition becomes a "real" variable and is
58 : rewritten as a compiler variable.
59 :
60 : The var_map data structure is used to manage these partitions. It allows
61 : partitions to be combined, and determines which partition belongs to what
62 : ssa_name or variable, and vice versa. */
63 :
64 :
65 : /* Remove the base table in MAP. */
66 :
67 : static void
68 4461692 : var_map_base_fini (var_map map)
69 : {
70 : /* Free the basevar info if it is present. */
71 4461692 : if (map->partition_to_base_index != NULL)
72 : {
73 1487231 : free (map->partition_to_base_index);
74 1487231 : map->partition_to_base_index = NULL;
75 1487231 : map->num_basevars = 0;
76 : }
77 4461692 : }
78 : /* Create a variable partition map of SIZE for region, initialize and return
79 : it. Region is a loop if LOOP is non-NULL, otherwise is the current
80 : function. If BITINT is non-NULL, only SSA_NAMEs from that bitmap
81 : will be coalesced. */
82 :
83 : var_map
84 1487231 : init_var_map (int size, class loop *loop, bitmap bitint)
85 : {
86 1487231 : var_map map;
87 :
88 1487231 : map = (var_map) xmalloc (sizeof (struct _var_map));
89 1487231 : map->var_partition = partition_new (size);
90 :
91 1487231 : map->partition_to_view = NULL;
92 1487231 : map->view_to_partition = NULL;
93 1487231 : map->num_partitions = size;
94 1487231 : map->partition_size = size;
95 1487231 : map->num_basevars = 0;
96 1487231 : map->partition_to_base_index = NULL;
97 1487231 : map->vec_bbs = vNULL;
98 1487231 : if (loop)
99 : {
100 0 : map->bmp_bbs = BITMAP_ALLOC (NULL);
101 0 : map->outofssa_p = false;
102 0 : basic_block *bbs = get_loop_body_in_dom_order (loop);
103 0 : for (unsigned i = 0; i < loop->num_nodes; ++i)
104 : {
105 0 : bitmap_set_bit (map->bmp_bbs, bbs[i]->index);
106 0 : map->vec_bbs.safe_push (bbs[i]);
107 : }
108 0 : free (bbs);
109 : }
110 : else
111 : {
112 1487231 : map->bmp_bbs = NULL;
113 1487231 : map->outofssa_p = bitint == NULL;
114 1487231 : map->bitint = bitint;
115 1487231 : basic_block bb;
116 2974462 : map->vec_bbs.reserve_exact (n_basic_blocks_for_fn (cfun)
117 1487231 : - NUM_FIXED_BLOCKS);
118 14107207 : FOR_EACH_BB_FN (bb, cfun)
119 12619976 : map->vec_bbs.quick_push (bb);
120 : }
121 1487231 : return map;
122 : }
123 :
124 :
125 : /* Free memory associated with MAP. */
126 :
127 : void
128 1487230 : delete_var_map (var_map map)
129 : {
130 1487230 : var_map_base_fini (map);
131 1487230 : partition_delete (map->var_partition);
132 1487230 : free (map->partition_to_view);
133 1487230 : free (map->view_to_partition);
134 1487230 : if (map->bmp_bbs)
135 0 : BITMAP_FREE (map->bmp_bbs);
136 1487230 : map->vec_bbs.release ();
137 1487230 : free (map);
138 1487230 : }
139 :
140 :
141 : /* This function will combine the partitions in MAP for VAR1 and VAR2. It
142 : Returns the partition which represents the new partition. If the two
143 : partitions cannot be combined, NO_PARTITION is returned. */
144 :
145 : int
146 5382961 : var_union (var_map map, tree var1, tree var2)
147 : {
148 5382961 : int p1, p2, p3;
149 :
150 5382961 : gcc_assert (TREE_CODE (var1) == SSA_NAME);
151 5382961 : gcc_assert (TREE_CODE (var2) == SSA_NAME);
152 :
153 : /* This is independent of partition_to_view. If partition_to_view is
154 : on, then whichever one of these partitions is absorbed will never have a
155 : dereference into the partition_to_view array any more. */
156 :
157 5382961 : p1 = partition_find (map->var_partition, SSA_NAME_VERSION (var1));
158 5382961 : p2 = partition_find (map->var_partition, SSA_NAME_VERSION (var2));
159 :
160 5382961 : gcc_assert (p1 != NO_PARTITION);
161 5382961 : gcc_assert (p2 != NO_PARTITION);
162 :
163 5382961 : if (p1 == p2)
164 : p3 = p1;
165 : else
166 5382961 : p3 = partition_union (map->var_partition, p1, p2);
167 :
168 5382961 : if (map->partition_to_view)
169 5382961 : p3 = map->partition_to_view[p3];
170 :
171 5382961 : return p3;
172 : }
173 :
174 :
175 : /* Compress the partition numbers in MAP such that they fall in the range
176 : 0..(num_partitions-1) instead of wherever they turned out during
177 : the partitioning exercise. This removes any references to unused
178 : partitions, thereby allowing bitmaps and other vectors to be much
179 : denser.
180 :
181 : This is implemented such that compaction doesn't affect partitioning.
182 : Ie., once partitions are created and possibly merged, running one
183 : or more different kind of compaction will not affect the partitions
184 : themselves. Their index might change, but all the same variables will
185 : still be members of the same partition group. This allows work on reduced
186 : sets, and no loss of information when a larger set is later desired.
187 :
188 : In particular, coalescing can work on partitions which have 2 or more
189 : definitions, and then 'recompact' later to include all the single
190 : definitions for assignment to program variables. */
191 :
192 :
193 : /* Set MAP back to the initial state of having no partition view. Return a
194 : bitmap which has a bit set for each partition number which is in use in the
195 : varmap. */
196 :
197 : static bitmap
198 2974462 : partition_view_init (var_map map)
199 : {
200 2974462 : bitmap used;
201 2974462 : int tmp;
202 2974462 : unsigned int x;
203 :
204 2974462 : used = BITMAP_ALLOC (NULL);
205 :
206 : /* Already in a view? Abandon the old one. */
207 2974462 : if (map->partition_to_view)
208 : {
209 1487231 : free (map->partition_to_view);
210 1487231 : map->partition_to_view = NULL;
211 : }
212 2974462 : if (map->view_to_partition)
213 : {
214 1487231 : free (map->view_to_partition);
215 1487231 : map->view_to_partition = NULL;
216 : }
217 :
218 : /* Find out which partitions are actually referenced. */
219 148850654 : for (x = 0; x < map->partition_size; x++)
220 : {
221 145876192 : tmp = partition_find (map->var_partition, x);
222 340201024 : if (ssa_name (tmp) != NULL_TREE && !virtual_operand_p (ssa_name (tmp))
223 209011410 : && (!has_zero_uses (ssa_name (tmp))
224 4216287 : || !SSA_NAME_IS_DEFAULT_DEF (ssa_name (tmp))
225 3535013 : || (SSA_NAME_VAR (ssa_name (tmp))
226 3535013 : && !VAR_P (SSA_NAME_VAR (ssa_name (tmp))))))
227 62618484 : bitmap_set_bit (used, tmp);
228 : }
229 :
230 2974462 : map->num_partitions = map->partition_size;
231 2974462 : return used;
232 : }
233 :
234 :
235 : /* This routine will finalize the view data for MAP based on the partitions
236 : set in SELECTED. This is either the same bitmap returned from
237 : partition_view_init, or a trimmed down version if some of those partitions
238 : were not desired in this view. SELECTED is freed before returning. */
239 :
240 : static void
241 2974462 : partition_view_fini (var_map map, bitmap selected)
242 : {
243 2974462 : bitmap_iterator bi;
244 2974462 : unsigned count, i, x, limit;
245 :
246 2974462 : gcc_assert (selected);
247 :
248 2974462 : count = bitmap_count_bits (selected);
249 2974462 : limit = map->partition_size;
250 :
251 : /* If its a one-to-one ratio, we don't need any view compaction. */
252 2974462 : if (count < limit)
253 : {
254 2974462 : map->partition_to_view = (int *)xmalloc (limit * sizeof (int));
255 2974462 : memset (map->partition_to_view, 0xff, (limit * sizeof (int)));
256 2974462 : map->view_to_partition = (int *)xmalloc (count * sizeof (int));
257 :
258 2974462 : i = 0;
259 : /* Give each selected partition an index. */
260 40213459 : EXECUTE_IF_SET_IN_BITMAP (selected, 0, x, bi)
261 : {
262 37238997 : map->partition_to_view[x] = i;
263 37238997 : map->view_to_partition[i] = x;
264 37238997 : i++;
265 : }
266 2974462 : gcc_assert (i == count);
267 2974462 : map->num_partitions = i;
268 : }
269 :
270 2974462 : BITMAP_FREE (selected);
271 2974462 : }
272 :
273 :
274 : /* Create a partition view which includes all the used partitions in MAP. */
275 :
276 : void
277 1487231 : partition_view_normal (var_map map)
278 : {
279 1487231 : bitmap used;
280 :
281 1487231 : used = partition_view_init (map);
282 1487231 : partition_view_fini (map, used);
283 :
284 1487231 : var_map_base_fini (map);
285 1487231 : }
286 :
287 :
288 : /* Create a partition view in MAP which includes just partitions which occur in
289 : the bitmap ONLY. If WANT_BASES is true, create the base variable map
290 : as well. */
291 :
292 : void
293 1487231 : partition_view_bitmap (var_map map, bitmap only)
294 : {
295 1487231 : bitmap used;
296 1487231 : bitmap new_partitions = BITMAP_ALLOC (NULL);
297 1487231 : unsigned x, p;
298 1487231 : bitmap_iterator bi;
299 :
300 1487231 : used = partition_view_init (map);
301 12799947 : EXECUTE_IF_SET_IN_BITMAP (only, 0, x, bi)
302 : {
303 11312716 : p = partition_find (map->var_partition, x);
304 11312716 : gcc_assert (bitmap_bit_p (used, p));
305 11312716 : bitmap_set_bit (new_partitions, p);
306 : }
307 1487231 : partition_view_fini (map, new_partitions);
308 :
309 1487231 : var_map_base_fini (map);
310 1487231 : }
311 :
312 :
313 : static bitmap usedvars;
314 :
315 : /* Mark VAR as used, so that it'll be preserved during rtl expansion.
316 : Returns true if VAR wasn't marked before. */
317 :
318 : static inline bool
319 179775084 : set_is_used (tree var)
320 : {
321 179775084 : return bitmap_set_bit (usedvars, DECL_UID (var));
322 : }
323 :
324 : /* Return true if VAR is marked as used. */
325 :
326 : static inline bool
327 193507754 : is_used_p (tree var)
328 : {
329 193507754 : return bitmap_bit_p (usedvars, DECL_UID (var));
330 : }
331 :
332 : static inline void mark_all_vars_used (tree *);
333 :
334 : /* Helper function for mark_all_vars_used, called via walk_tree. */
335 :
336 : static tree
337 1064505922 : mark_all_vars_used_1 (tree *tp, int *walk_subtrees, void *data ATTRIBUTE_UNUSED)
338 : {
339 1064505922 : tree t = *tp;
340 1064505922 : enum tree_code_class c = TREE_CODE_CLASS (TREE_CODE (t));
341 1064505922 : tree b;
342 :
343 1064505922 : if (TREE_CODE (t) == SSA_NAME)
344 : {
345 403017136 : *walk_subtrees = 0;
346 403017136 : t = SSA_NAME_VAR (t);
347 : if (!t)
348 : return NULL;
349 : }
350 :
351 794097212 : if (IS_EXPR_CODE_CLASS (c)
352 794097212 : && (b = TREE_BLOCK (t)) != NULL)
353 77348376 : TREE_USED (b) = true;
354 :
355 : /* Ignore TMR_OFFSET and TMR_STEP for TARGET_MEM_REFS, as those
356 : fields do not contain vars. */
357 794097212 : if (TREE_CODE (t) == TARGET_MEM_REF)
358 : {
359 1704594 : mark_all_vars_used (&TMR_BASE (t));
360 1704594 : mark_all_vars_used (&TMR_INDEX (t));
361 1704594 : mark_all_vars_used (&TMR_INDEX2 (t));
362 1704594 : *walk_subtrees = 0;
363 1704594 : return NULL;
364 : }
365 :
366 : /* Only need to mark VAR_DECLS; parameters and return results are not
367 : eliminated as unused. */
368 792392618 : if (VAR_P (t))
369 : {
370 : /* When a global var becomes used for the first time also walk its
371 : initializer (non global ones don't have any). */
372 221076121 : if (set_is_used (t) && is_global_var (t)
373 186875439 : && DECL_CONTEXT (t) == current_function_decl)
374 1062668 : mark_all_vars_used (&DECL_INITIAL (t));
375 : }
376 : /* remove_unused_scope_block_p requires information about labels
377 : which are not DECL_IGNORED_P to tell if they might be used in the IL. */
378 612617534 : else if (TREE_CODE (t) == LABEL_DECL)
379 : /* Although the TREE_USED values that the frontend uses would be
380 : acceptable (albeit slightly over-conservative) for our purposes,
381 : init_vars_expansion clears TREE_USED for LABEL_DECLs too, so we
382 : must re-compute it here. */
383 6299852 : TREE_USED (t) = 1;
384 :
385 792392618 : if (IS_TYPE_OR_DECL_P (t))
386 355680285 : *walk_subtrees = 0;
387 :
388 : return NULL;
389 : }
390 :
391 : /* Mark the scope block SCOPE and its subblocks unused when they can be
392 : possibly eliminated if dead. */
393 :
394 : static void
395 115976820 : mark_scope_block_unused (tree scope)
396 : {
397 115976820 : tree t;
398 115976820 : TREE_USED (scope) = false;
399 115976820 : if (!(*debug_hooks->ignore_block) (scope))
400 556301 : TREE_USED (scope) = true;
401 220440053 : for (t = BLOCK_SUBBLOCKS (scope); t ; t = BLOCK_CHAIN (t))
402 104463233 : mark_scope_block_unused (t);
403 115976820 : }
404 :
405 : /* Look if the block is dead (by possibly eliminating its dead subblocks)
406 : and return true if so.
407 : Block is declared dead if:
408 : 1) No statements are associated with it.
409 : 2) Declares no live variables
410 : 3) All subblocks are dead
411 : or there is precisely one subblocks and the block
412 : has same abstract origin as outer block and declares
413 : no variables, so it is pure wrapper.
414 : When we are not outputting full debug info, we also eliminate dead variables
415 : out of scope blocks to let them to be recycled by GGC and to save copying work
416 : done by the inliner. */
417 :
418 : static bool
419 115976820 : remove_unused_scope_block_p (tree scope, bool in_ctor_dtor_block)
420 : {
421 115976820 : tree *t, *next;
422 115976820 : bool unused = !TREE_USED (scope);
423 115976820 : int nsubblocks = 0;
424 :
425 : /* For ipa-polymorphic-call.cc purposes, preserve blocks:
426 : 1) with BLOCK_ABSTRACT_ORIGIN of a ctor/dtor or their clones */
427 115976820 : if (inlined_polymorphic_ctor_dtor_block_p (scope, true))
428 : {
429 : in_ctor_dtor_block = true;
430 : unused = false;
431 : }
432 : /* 2) inside such blocks, the outermost block with block_ultimate_origin
433 : being a FUNCTION_DECL. */
434 99713875 : else if (in_ctor_dtor_block)
435 : {
436 13373916 : tree fn = block_ultimate_origin (scope);
437 13373916 : if (fn && TREE_CODE (fn) == FUNCTION_DECL)
438 : {
439 115976820 : in_ctor_dtor_block = false;
440 115976820 : unused = false;
441 : }
442 : }
443 :
444 235527969 : for (t = &BLOCK_VARS (scope); *t; t = next)
445 : {
446 119551149 : next = &DECL_CHAIN (*t);
447 :
448 : /* Debug info of nested function refers to the block of the
449 : function. We might stil call it even if all statements
450 : of function it was nested into was elliminated.
451 :
452 : TODO: We can actually look into cgraph to see if function
453 : will be output to file. */
454 119551149 : if (TREE_CODE (*t) == FUNCTION_DECL)
455 : unused = false;
456 :
457 : /* If a decl has a value expr, we need to instantiate it
458 : regardless of debug info generation, to avoid codegen
459 : differences in memory overlap tests. update_equiv_regs() may
460 : indirectly call validate_equiv_mem() to test whether a
461 : SET_DEST overlaps with others, and if the value expr changes
462 : by virtual register instantiation, we may get end up with
463 : different results. */
464 119211187 : else if (VAR_P (*t) && DECL_HAS_VALUE_EXPR_P (*t))
465 : unused = false;
466 :
467 : /* Remove everything we don't generate debug info for. */
468 117283829 : else if (DECL_IGNORED_P (*t))
469 : {
470 4243657 : *t = DECL_CHAIN (*t);
471 4243657 : next = t;
472 : }
473 :
474 : /* When we are outputting debug info, we usually want to output
475 : info about optimized-out variables in the scope blocks.
476 : Exception are the scope blocks not containing any instructions
477 : at all so user can't get into the scopes at first place. */
478 113040172 : else if (is_used_p (*t))
479 : unused = false;
480 99210369 : else if (TREE_CODE (*t) == LABEL_DECL && TREE_USED (*t))
481 : /* For labels that are still used in the IL, the decision to
482 : preserve them must not depend DEBUG_INFO_LEVEL, otherwise we
483 : risk having different ordering in debug vs. non-debug builds
484 : during inlining or versioning.
485 : A label appearing here (we have already checked DECL_IGNORED_P)
486 : should not be used in the IL unless it has been explicitly used
487 : before, so we use TREE_USED as an approximation. */
488 : /* In principle, we should do the same here as for the debug case
489 : below, however, when debugging, there might be additional nested
490 : levels that keep an upper level with a label live, so we have to
491 : force this block to be considered used, too. */
492 : unused = false;
493 :
494 : /* When we are not doing full debug info, we however can keep around
495 : only the used variables for cfgexpand's memory packing saving quite
496 : a lot of memory.
497 :
498 : For sake of -g3, we keep around those vars but we don't count this as
499 : use of block, so innermost block with no used vars and no instructions
500 : can be considered dead. We only want to keep around blocks user can
501 : breakpoint into and ask about value of optimized out variables.
502 :
503 : Similarly we need to keep around types at least until all
504 : variables of all nested blocks are gone. We track no
505 : information on whether given type is used or not, so we have
506 : to keep them even when not emitting debug information,
507 : otherwise we may end up remapping variables and their (local)
508 : types in different orders depending on whether debug
509 : information is being generated. */
510 :
511 98431813 : else if (TREE_CODE (*t) == TYPE_DECL
512 93802156 : || debug_info_level == DINFO_LEVEL_NORMAL
513 2354072 : || debug_info_level == DINFO_LEVEL_VERBOSE)
514 : ;
515 : else
516 : {
517 2344728 : *t = DECL_CHAIN (*t);
518 2344728 : next = t;
519 : }
520 : }
521 :
522 220440053 : for (t = &BLOCK_SUBBLOCKS (scope); *t ;)
523 104463233 : if (remove_unused_scope_block_p (*t, in_ctor_dtor_block))
524 : {
525 8574789 : if (BLOCK_SUBBLOCKS (*t))
526 : {
527 2865176 : tree next = BLOCK_CHAIN (*t);
528 2865176 : tree supercontext = BLOCK_SUPERCONTEXT (*t);
529 :
530 2865176 : *t = BLOCK_SUBBLOCKS (*t);
531 3551404 : while (BLOCK_CHAIN (*t))
532 : {
533 686228 : BLOCK_SUPERCONTEXT (*t) = supercontext;
534 686228 : t = &BLOCK_CHAIN (*t);
535 : }
536 2865176 : BLOCK_CHAIN (*t) = next;
537 2865176 : BLOCK_SUPERCONTEXT (*t) = supercontext;
538 2865176 : t = &BLOCK_CHAIN (*t);
539 2865176 : nsubblocks ++;
540 : }
541 : else
542 5709613 : *t = BLOCK_CHAIN (*t);
543 : }
544 : else
545 : {
546 95888444 : t = &BLOCK_CHAIN (*t);
547 95888444 : nsubblocks ++;
548 : }
549 :
550 :
551 115976820 : if (!unused)
552 : ;
553 : /* Outer scope is always used. */
554 27485149 : else if (!BLOCK_SUPERCONTEXT (scope)
555 27485149 : || TREE_CODE (BLOCK_SUPERCONTEXT (scope)) == FUNCTION_DECL)
556 : unused = false;
557 : /* Innermost blocks with no live variables nor statements can be always
558 : eliminated. */
559 26331305 : else if (!nsubblocks)
560 : ;
561 : /* When not generating debug info we can eliminate info on unused
562 : variables. */
563 20621692 : else if (!flag_auto_profile
564 20621692 : && debug_info_level == DINFO_LEVEL_NONE
565 22328335 : && !optinfo_wants_inlining_info_p ())
566 : {
567 : /* Even for -g0 don't prune outer scopes from inlined functions,
568 : otherwise late diagnostics from such functions will not be
569 : emitted or suppressed properly. */
570 1706575 : if (inlined_function_outer_scope_p (scope))
571 : {
572 1431932 : gcc_assert (TREE_CODE (BLOCK_ORIGIN (scope)) == FUNCTION_DECL);
573 : unused = false;
574 : }
575 : }
576 18915117 : else if (BLOCK_VARS (scope) || BLOCK_NUM_NONLOCALIZED_VARS (scope))
577 : unused = false;
578 : /* See if this block is important for representation of inlined
579 : function. Inlined functions are always represented by block
580 : with block_ultimate_origin being set to FUNCTION_DECL and
581 : DECL_SOURCE_LOCATION set, unless they expand to nothing... */
582 2734059 : else if (inlined_function_outer_scope_p (scope))
583 : unused = false;
584 : else
585 : /* Verfify that only blocks with source location set
586 : are entry points to the inlined functions. */
587 2590533 : gcc_assert (LOCATION_LOCUS (BLOCK_SOURCE_LOCATION (scope))
588 : == UNKNOWN_LOCATION);
589 :
590 115976820 : TREE_USED (scope) = !unused;
591 115976820 : return unused;
592 : }
593 :
594 : /* Mark all VAR_DECLS under *EXPR_P as used, so that they won't be
595 : eliminated during the tree->rtl conversion process. */
596 :
597 : static inline void
598 797360050 : mark_all_vars_used (tree *expr_p)
599 : {
600 797360050 : walk_tree (expr_p, mark_all_vars_used_1, NULL, NULL);
601 797360050 : }
602 :
603 : /* Helper function for clear_unused_block_pointer, called via walk_tree. */
604 :
605 : static tree
606 485707742 : clear_unused_block_pointer_1 (tree *tp, int *, void *)
607 : {
608 80554073 : if (EXPR_P (*tp) && TREE_BLOCK (*tp)
609 540660584 : && !TREE_USED (TREE_BLOCK (*tp)))
610 1348002 : TREE_SET_BLOCK (*tp, NULL);
611 485707742 : return NULL_TREE;
612 : }
613 :
614 : /* Clear references to unused BLOCKs from DECL_VALUE_EXPRs of variables
615 : in BLOCK. */
616 :
617 : static void
618 107402031 : clear_unused_block_pointer_in_block (tree block)
619 : {
620 216755680 : for (tree t = BLOCK_VARS (block); t; t = DECL_CHAIN (t))
621 109353649 : if (VAR_P (t) && DECL_HAS_VALUE_EXPR_P (t))
622 : {
623 1927358 : tree val = DECL_VALUE_EXPR (t);
624 1927358 : walk_tree (&val, clear_unused_block_pointer_1, NULL, NULL);
625 : }
626 203290475 : for (tree t = BLOCK_SUBBLOCKS (block); t; t = BLOCK_CHAIN (t))
627 95888444 : clear_unused_block_pointer_in_block (t);
628 107402031 : }
629 :
630 : /* Set all block pointer in debug or clobber stmt to NULL if the block
631 : is unused, so that they will not be streamed out. */
632 :
633 : static void
634 11513587 : clear_unused_block_pointer (void)
635 : {
636 11513587 : basic_block bb;
637 11513587 : gimple_stmt_iterator gsi;
638 :
639 91868462 : FOR_EACH_BB_FN (bb, cfun)
640 721055006 : for (gsi = gsi_start_bb (bb); !gsi_end_p (gsi); gsi_next (&gsi))
641 : {
642 562084802 : unsigned i;
643 562084802 : tree b;
644 562084802 : gimple *stmt;
645 :
646 560349420 : next:
647 562084802 : stmt = gsi_stmt (gsi);
648 562084802 : if (!is_gimple_debug (stmt) && !gimple_clobber_p (stmt))
649 264021517 : continue;
650 298063285 : b = gimple_block (stmt);
651 298063285 : if (b && !TREE_USED (b))
652 : {
653 : /* Elide debug marker stmts that have an associated BLOCK from an
654 : inline instance removed with also the outermost scope BLOCK of
655 : said inline instance removed. If the outermost scope BLOCK of
656 : said inline instance is preserved use that in place of the
657 : removed BLOCK. That keeps the marker associated to the correct
658 : inline instance (or no inline instance in case it was not from
659 : an inline instance). */
660 7303524 : if (gimple_debug_nonbind_marker_p (stmt)
661 9199060 : && BLOCK_ABSTRACT_ORIGIN (b))
662 : {
663 2284946 : while (TREE_CODE (b) == BLOCK
664 2284946 : && !inlined_function_outer_scope_p (b))
665 404172 : b = BLOCK_SUPERCONTEXT (b);
666 1880774 : if (TREE_CODE (b) == BLOCK)
667 : {
668 1878959 : if (TREE_USED (b))
669 : {
670 139413 : gimple_set_block (stmt, b);
671 139413 : continue;
672 : }
673 1739546 : gsi_remove (&gsi, true);
674 1739546 : if (gsi_end_p (gsi))
675 : break;
676 1735382 : goto next;
677 : }
678 : }
679 5424565 : gimple_set_block (stmt, NULL);
680 : }
681 752347282 : for (i = 0; i < gimple_num_ops (stmt); i++)
682 456162956 : walk_tree (gimple_op_ptr (stmt, i), clear_unused_block_pointer_1,
683 : NULL, NULL);
684 : }
685 :
686 : /* Walk all variables mentioned in the functions BLOCK tree and clear
687 : DECL_VALUE_EXPR from unused blocks where present. */
688 11513587 : clear_unused_block_pointer_in_block (DECL_INITIAL (current_function_decl));
689 11513587 : }
690 :
691 : /* Dump scope blocks starting at SCOPE to FILE. INDENT is the
692 : indentation level and FLAGS is as in print_generic_expr. */
693 :
694 : static void
695 4448 : dump_scope_block (FILE *file, int indent, tree scope, dump_flags_t flags)
696 : {
697 4448 : tree var, t;
698 4448 : unsigned int i;
699 :
700 4448 : fprintf (file, "\n%*s{ Scope block #%i%s",indent, "" , BLOCK_NUMBER (scope),
701 4448 : TREE_USED (scope) ? "" : " (unused)");
702 4448 : if (LOCATION_LOCUS (BLOCK_SOURCE_LOCATION (scope)) != UNKNOWN_LOCATION)
703 : {
704 947 : expanded_location s = expand_location (BLOCK_SOURCE_LOCATION (scope));
705 947 : fprintf (file, " %s:%i:%i", s.file, s.line, s.column);
706 947 : if (has_discriminator (BLOCK_SOURCE_LOCATION (scope)))
707 58 : fprintf (file, " discrim %i",
708 29 : get_discriminator_from_loc (BLOCK_SOURCE_LOCATION (scope)));
709 : }
710 4448 : if (BLOCK_ABSTRACT_ORIGIN (scope))
711 : {
712 2055 : tree origin = block_ultimate_origin (scope);
713 2055 : if (origin)
714 : {
715 2055 : fprintf (file, " Originating from :");
716 2055 : if (DECL_P (origin))
717 947 : print_generic_decl (file, origin, flags);
718 : else
719 1108 : fprintf (file, "#%i", BLOCK_NUMBER (origin));
720 : }
721 : }
722 4448 : if (BLOCK_FRAGMENT_ORIGIN (scope))
723 0 : fprintf (file, " Fragment of : #%i",
724 0 : BLOCK_NUMBER (BLOCK_FRAGMENT_ORIGIN (scope)));
725 4448 : else if (BLOCK_FRAGMENT_CHAIN (scope))
726 : {
727 0 : fprintf (file, " Fragment chain :");
728 0 : for (t = BLOCK_FRAGMENT_CHAIN (scope); t ;
729 0 : t = BLOCK_FRAGMENT_CHAIN (t))
730 0 : fprintf (file, " #%i", BLOCK_NUMBER (t));
731 : }
732 4448 : fprintf (file, " \n");
733 8310 : for (var = BLOCK_VARS (scope); var; var = DECL_CHAIN (var))
734 : {
735 3862 : fprintf (file, "%*s", indent, "");
736 3862 : print_generic_decl (file, var, flags);
737 3862 : fprintf (file, "\n");
738 : }
739 4448 : for (i = 0; i < BLOCK_NUM_NONLOCALIZED_VARS (scope); i++)
740 : {
741 0 : fprintf (file, "%*s",indent, "");
742 0 : print_generic_decl (file, BLOCK_NONLOCALIZED_VAR (scope, i),
743 : flags);
744 0 : fprintf (file, " (nonlocalized)\n");
745 : }
746 6898 : for (t = BLOCK_SUBBLOCKS (scope); t ; t = BLOCK_CHAIN (t))
747 2450 : dump_scope_block (file, indent + 2, t, flags);
748 4448 : fprintf (file, "\n%*s}\n",indent, "");
749 4448 : }
750 :
751 : /* Dump the tree of lexical scopes starting at SCOPE to stderr. FLAGS
752 : is as in print_generic_expr. */
753 :
754 : DEBUG_FUNCTION void
755 0 : debug_scope_block (tree scope, dump_flags_t flags)
756 : {
757 0 : dump_scope_block (stderr, 0, scope, flags);
758 0 : }
759 :
760 :
761 : /* Dump the tree of lexical scopes of current_function_decl to FILE.
762 : FLAGS is as in print_generic_expr. */
763 :
764 : void
765 1998 : dump_scope_blocks (FILE *file, dump_flags_t flags)
766 : {
767 1998 : dump_scope_block (file, 0, DECL_INITIAL (current_function_decl), flags);
768 1998 : }
769 :
770 :
771 : /* Dump the tree of lexical scopes of current_function_decl to stderr.
772 : FLAGS is as in print_generic_expr. */
773 :
774 : DEBUG_FUNCTION void
775 0 : debug_scope_blocks (dump_flags_t flags)
776 : {
777 0 : dump_scope_blocks (stderr, flags);
778 0 : }
779 :
780 : /* Remove local variables that are not referenced in the IL. */
781 :
782 : void
783 12872141 : remove_unused_locals (void)
784 : {
785 12872141 : basic_block bb;
786 12872141 : tree var;
787 12872141 : unsigned srcidx, dstidx, num;
788 12872141 : bool have_local_clobbers = false;
789 :
790 : /* Removing declarations from lexical blocks when not optimizing is
791 : not only a waste of time, it actually causes differences in stack
792 : layout. */
793 12872141 : if (!optimize)
794 1358554 : return;
795 :
796 11513587 : timevar_push (TV_REMOVE_UNUSED);
797 :
798 11513587 : mark_scope_block_unused (DECL_INITIAL (current_function_decl));
799 :
800 11513587 : usedvars = BITMAP_ALLOC (NULL);
801 11513587 : auto_bitmap useddebug;
802 :
803 : /* Walk the CFG marking all referenced symbols. */
804 91868462 : FOR_EACH_BB_FN (bb, cfun)
805 : {
806 80354875 : gimple_stmt_iterator gsi;
807 80354875 : size_t i;
808 80354875 : edge_iterator ei;
809 80354875 : edge e;
810 :
811 : /* Walk the statements. */
812 728653513 : for (gsi = gsi_start_bb (bb); !gsi_end_p (gsi); gsi_next (&gsi))
813 : {
814 567943763 : gimple *stmt = gsi_stmt (gsi);
815 567943763 : tree b = gimple_block (stmt);
816 :
817 : /* If we wanted to mark the block referenced by the inline
818 : entry point marker as used, this would be a good spot to
819 : do it. If the block is not otherwise used, the stmt will
820 : be cleaned up in clean_unused_block_pointer. */
821 567943763 : if (is_gimple_debug (stmt))
822 : {
823 290632550 : if (gimple_debug_bind_p (stmt))
824 : {
825 220070006 : tree var = gimple_debug_bind_get_var (stmt);
826 220070006 : if (VAR_P (var))
827 : {
828 207260771 : if (!gimple_debug_bind_get_value (stmt))
829 : /* Run the 2nd phase. */
830 : have_local_clobbers = true;
831 : else
832 109634772 : bitmap_set_bit (useddebug, DECL_UID (var));
833 : }
834 : }
835 290632550 : continue;
836 290632550 : }
837 :
838 277311213 : if (gimple_clobber_p (stmt))
839 : {
840 13289550 : have_local_clobbers = true;
841 13289550 : continue;
842 : }
843 :
844 264021663 : if (gimple_call_internal_p (stmt, IFN_DEFERRED_INIT))
845 : {
846 310605 : have_local_clobbers = true;
847 310605 : continue;
848 : }
849 :
850 263711058 : if (b)
851 239829357 : TREE_USED (b) = true;
852 :
853 1005564467 : for (i = 0; i < gimple_num_ops (stmt); i++)
854 741853409 : mark_all_vars_used (gimple_op_ptr (gsi_stmt (gsi), i));
855 : }
856 :
857 80354875 : for (gphi_iterator gpi = gsi_start_phis (bb);
858 107436604 : !gsi_end_p (gpi);
859 27081729 : gsi_next (&gpi))
860 : {
861 27081729 : use_operand_p arg_p;
862 27081729 : ssa_op_iter i;
863 27081729 : tree def;
864 27081729 : gphi *phi = gpi.phi ();
865 :
866 54163458 : if (virtual_operand_p (gimple_phi_result (phi)))
867 12397591 : continue;
868 :
869 14684138 : def = gimple_phi_result (phi);
870 14684138 : mark_all_vars_used (&def);
871 :
872 49330191 : FOR_EACH_PHI_ARG (arg_p, phi, i, SSA_OP_ALL_USES)
873 : {
874 34646053 : tree arg = USE_FROM_PTR (arg_p);
875 34646053 : int index = PHI_ARG_INDEX_FROM_USE (arg_p);
876 34646053 : tree block =
877 34646053 : LOCATION_BLOCK (gimple_phi_arg_location (phi, index));
878 20532120 : if (block != NULL)
879 20528618 : TREE_USED (block) = true;
880 34646053 : mark_all_vars_used (&arg);
881 : }
882 : }
883 :
884 192393699 : FOR_EACH_EDGE (e, ei, bb->succs)
885 112038824 : if (LOCATION_BLOCK (e->goto_locus) != NULL)
886 23760118 : TREE_USED (LOCATION_BLOCK (e->goto_locus)) = true;
887 : }
888 :
889 : /* We do a two-pass approach about the out-of-scope clobbers. We want
890 : to remove them if they are the only references to a local variable,
891 : but we want to retain them when there's any other. So the first pass
892 : ignores them, and the second pass (if there were any) tries to remove
893 : them. We do the same for .DEFERRED_INIT. */
894 11513587 : if (have_local_clobbers)
895 61654196 : FOR_EACH_BB_FN (bb, cfun)
896 : {
897 56835273 : gimple_stmt_iterator gsi;
898 :
899 597170743 : for (gsi = gsi_start_bb (bb); !gsi_end_p (gsi);)
900 : {
901 483500197 : gimple *stmt = gsi_stmt (gsi);
902 483500197 : tree b = gimple_block (stmt);
903 :
904 483500197 : if (gimple_clobber_p (stmt))
905 : {
906 13289550 : tree lhs = gimple_assign_lhs (stmt);
907 13289550 : tree base = get_base_address (lhs);
908 : /* Remove clobbers referencing unused vars, or clobbers
909 : with MEM_REF lhs referencing uninitialized pointers. */
910 12158790 : if ((VAR_P (base) && !is_used_p (base))
911 24399865 : || (TREE_CODE (lhs) == MEM_REF
912 1283126 : && TREE_CODE (TREE_OPERAND (lhs, 0)) == SSA_NAME
913 1129953 : && SSA_NAME_IS_DEFAULT_DEF (TREE_OPERAND (lhs, 0))
914 585209 : && (TREE_CODE (SSA_NAME_VAR (TREE_OPERAND (lhs, 0)))
915 : != PARM_DECL)))
916 : {
917 1051893 : unlink_stmt_vdef (stmt);
918 1051893 : gsi_remove (&gsi, true);
919 1051893 : release_defs (stmt);
920 1051893 : continue;
921 : }
922 12237657 : if (b)
923 7597367 : TREE_USED (b) = true;
924 : }
925 470210647 : else if (gimple_call_internal_p (stmt, IFN_DEFERRED_INIT))
926 : {
927 310605 : tree lhs = gimple_call_lhs (stmt);
928 310605 : tree base = get_base_address (lhs);
929 257009 : if ((DECL_P (base) && !is_used_p (base))
930 567472 : || (TREE_CODE (lhs) == MEM_REF
931 138 : && TREE_CODE (TREE_OPERAND (lhs, 0)) == SSA_NAME
932 105 : && SSA_NAME_IS_DEFAULT_DEF (TREE_OPERAND (lhs, 0))
933 4 : && (TREE_CODE (SSA_NAME_VAR (TREE_OPERAND (lhs, 0)))
934 : != PARM_DECL)))
935 : {
936 146 : unlink_stmt_vdef (stmt);
937 146 : gsi_remove (&gsi, true);
938 146 : release_defs (stmt);
939 146 : continue;
940 : }
941 310459 : if (b)
942 310442 : TREE_USED (b) = true;
943 : }
944 469900042 : else if (gimple_debug_bind_p (stmt))
945 : {
946 216966970 : tree var = gimple_debug_bind_get_var (stmt);
947 221773892 : if (VAR_P (var)
948 204420524 : && !bitmap_bit_p (useddebug, DECL_UID (var))
949 222271511 : && !is_used_p (var))
950 : {
951 4806922 : if (dump_file && (dump_flags & TDF_DETAILS))
952 0 : fprintf (dump_file, "Dead debug bind reset to %u\n",
953 0 : DECL_UID (var));
954 4806922 : gsi_remove (&gsi, true);
955 4806922 : continue;
956 : }
957 : }
958 477641236 : gsi_next (&gsi);
959 : }
960 : }
961 :
962 11513587 : if (cfun->has_simduid_loops)
963 : {
964 123385 : for (auto loop : loops_list (cfun, 0))
965 45235 : if (loop->simduid && !is_used_p (loop->simduid))
966 26332 : loop->simduid = NULL_TREE;
967 : }
968 :
969 11513587 : cfun->has_local_explicit_reg_vars = false;
970 :
971 : /* Remove unmarked local and global vars from local_decls. */
972 11513587 : num = vec_safe_length (cfun->local_decls);
973 74249689 : for (srcidx = 0, dstidx = 0; srcidx < num; srcidx++)
974 : {
975 62736102 : var = (*cfun->local_decls)[srcidx];
976 62736102 : if (VAR_P (var))
977 : {
978 62736102 : if (!is_used_p (var))
979 : {
980 27415269 : tree def;
981 27415269 : if (cfun->nonlocal_goto_save_area
982 27415269 : && TREE_OPERAND (cfun->nonlocal_goto_save_area, 0) == var)
983 10 : cfun->nonlocal_goto_save_area = NULL;
984 : /* Release any default def associated with var. */
985 27415269 : if ((def = ssa_default_def (cfun, var)) != NULL_TREE)
986 : {
987 1110864 : set_ssa_default_def (cfun, var, NULL_TREE);
988 1110864 : release_ssa_name (def);
989 : }
990 27415269 : continue;
991 27415269 : }
992 : }
993 35320833 : if (VAR_P (var) && DECL_HARD_REGISTER (var) && !is_global_var (var))
994 6591 : cfun->has_local_explicit_reg_vars = true;
995 :
996 35320833 : if (srcidx != dstidx)
997 14946988 : (*cfun->local_decls)[dstidx] = var;
998 35320833 : dstidx++;
999 : }
1000 11513587 : if (dstidx != num)
1001 : {
1002 4173627 : statistics_counter_event (cfun, "unused VAR_DECLs removed", num - dstidx);
1003 4173627 : cfun->local_decls->truncate (dstidx);
1004 : }
1005 :
1006 11513587 : remove_unused_scope_block_p (DECL_INITIAL (current_function_decl),
1007 11513587 : polymorphic_ctor_dtor_p (current_function_decl,
1008 : true) != NULL_TREE);
1009 11513587 : clear_unused_block_pointer ();
1010 :
1011 11513587 : BITMAP_FREE (usedvars);
1012 :
1013 11513587 : if (dump_file && (dump_flags & TDF_DETAILS))
1014 : {
1015 1996 : fprintf (dump_file, "Scope blocks after cleanups:\n");
1016 1996 : dump_scope_blocks (dump_file, dump_flags);
1017 : }
1018 :
1019 11513587 : timevar_pop (TV_REMOVE_UNUSED);
1020 11513587 : }
1021 :
1022 : /* Allocate and return a new live range information object base on MAP. */
1023 :
1024 : static tree_live_info_p
1025 1298478 : new_tree_live_info (var_map map)
1026 : {
1027 1298478 : tree_live_info_p live;
1028 1298478 : basic_block bb;
1029 :
1030 1298478 : live = XNEW (struct tree_live_info_d);
1031 1298478 : live->map = map;
1032 1298478 : live->num_blocks = last_basic_block_for_fn (cfun);
1033 :
1034 1298478 : bitmap_obstack_initialize (&live->livein_obstack);
1035 1298478 : bitmap_obstack_initialize (&live->liveout_obstack);
1036 :
1037 1298478 : live->livein = XCNEWVEC (bitmap_head, last_basic_block_for_fn (cfun));
1038 1298478 : live->liveout = XCNEWVEC (bitmap_head, last_basic_block_for_fn (cfun));
1039 13120320 : for (unsigned i = 0; map->vec_bbs.iterate (i, &bb); ++i)
1040 : {
1041 11821842 : bitmap_initialize (&live->livein[bb->index], &live->livein_obstack);
1042 11821842 : bitmap_initialize (&live->liveout[bb->index], &live->liveout_obstack);
1043 : }
1044 :
1045 1298478 : live->work_stack = XNEWVEC (int, last_basic_block_for_fn (cfun));
1046 1298478 : live->stack_top = live->work_stack;
1047 :
1048 1298478 : return live;
1049 : }
1050 :
1051 :
1052 : /* Free storage for live range info object LIVE. */
1053 :
1054 : void
1055 1298478 : delete_tree_live_info (tree_live_info_p live)
1056 : {
1057 1298478 : if (live->livein)
1058 : {
1059 0 : bitmap_obstack_release (&live->livein_obstack);
1060 0 : free (live->livein);
1061 : }
1062 1298478 : if (live->liveout)
1063 : {
1064 1298478 : bitmap_obstack_release (&live->liveout_obstack);
1065 1298478 : free (live->liveout);
1066 : }
1067 1298478 : free (live->work_stack);
1068 1298478 : free (live);
1069 1298478 : }
1070 :
1071 :
1072 : /* Visit basic block BB and propagate any required live on entry bits from
1073 : LIVE into the predecessors. VISITED is the bitmap of visited blocks.
1074 : TMP is a temporary work bitmap which is passed in to avoid reallocating
1075 : it each time. */
1076 :
1077 : static void
1078 13513495 : loe_visit_block (tree_live_info_p live, basic_block bb, sbitmap visited)
1079 : {
1080 13513495 : edge e;
1081 13513495 : bool change;
1082 13513495 : edge_iterator ei;
1083 13513495 : basic_block pred_bb;
1084 13513495 : bitmap loe;
1085 :
1086 13513495 : gcc_checking_assert (!bitmap_bit_p (visited, bb->index));
1087 13513495 : bitmap_set_bit (visited, bb->index);
1088 :
1089 13513495 : loe = live_on_entry (live, bb);
1090 :
1091 33223960 : FOR_EACH_EDGE (e, ei, bb->preds)
1092 : {
1093 19710465 : pred_bb = e->src;
1094 19710465 : if (!region_contains_p (live->map, pred_bb))
1095 1315850 : continue;
1096 : /* Variables live-on-entry from BB that aren't defined in the
1097 : predecessor block. This should be the live on entry vars to pred.
1098 : Note that liveout is the DEFs in a block while live on entry is
1099 : being calculated.
1100 : Add these bits to live-on-entry for the pred. if there are any
1101 : changes, and pred_bb has been visited already, add it to the
1102 : revisit stack. */
1103 18394615 : change = bitmap_ior_and_compl_into (live_on_entry (live, pred_bb),
1104 18394615 : loe, &live->liveout[pred_bb->index]);
1105 18394615 : if (change
1106 18394615 : && bitmap_bit_p (visited, pred_bb->index))
1107 : {
1108 1691653 : bitmap_clear_bit (visited, pred_bb->index);
1109 1691653 : *(live->stack_top)++ = pred_bb->index;
1110 : }
1111 : }
1112 13513495 : }
1113 :
1114 :
1115 : /* Using LIVE, fill in all the live-on-entry blocks between the defs and uses
1116 : of all the variables. */
1117 :
1118 : static void
1119 1298478 : live_worklist (tree_live_info_p live)
1120 : {
1121 1298478 : unsigned b;
1122 1298478 : basic_block bb;
1123 1298478 : auto_sbitmap visited (last_basic_block_for_fn (cfun) + 1);
1124 :
1125 1298478 : bitmap_clear (visited);
1126 :
1127 : /* Visit region's blocks in reverse order and propagate live on entry values
1128 : into the predecessors blocks. */
1129 14418798 : for (unsigned i = live->map->vec_bbs.length () - 1;
1130 13120320 : live->map->vec_bbs.iterate (i, &bb); --i)
1131 11821842 : loe_visit_block (live, bb, visited);
1132 :
1133 : /* Process any blocks which require further iteration. */
1134 2990131 : while (live->stack_top != live->work_stack)
1135 : {
1136 1691653 : b = *--(live->stack_top);
1137 1691653 : loe_visit_block (live, BASIC_BLOCK_FOR_FN (cfun, b), visited);
1138 : }
1139 1298478 : }
1140 :
1141 :
1142 : /* Calculate the initial live on entry vector for SSA_NAME using immediate_use
1143 : links. Set the live on entry fields in LIVE. Def's are marked temporarily
1144 : in the liveout vector. */
1145 :
1146 : static void
1147 11312716 : set_var_live_on_entry (tree ssa_name, tree_live_info_p live)
1148 : {
1149 11312716 : int p;
1150 11312716 : gimple *stmt;
1151 11312716 : use_operand_p use;
1152 11312716 : basic_block def_bb = NULL;
1153 11312716 : imm_use_iterator imm_iter;
1154 :
1155 11312716 : p = var_to_partition (live->map, ssa_name);
1156 11312716 : if (p == NO_PARTITION)
1157 731337 : return;
1158 :
1159 11312716 : stmt = SSA_NAME_DEF_STMT (ssa_name);
1160 11312716 : if (stmt)
1161 : {
1162 11312716 : def_bb = gimple_bb (stmt);
1163 : /* Mark defs in liveout bitmap temporarily. */
1164 11312716 : if (def_bb && region_contains_p (live->map, def_bb))
1165 7626832 : bitmap_set_bit (&live->liveout[def_bb->index], p);
1166 : }
1167 : else
1168 0 : def_bb = ENTRY_BLOCK_PTR_FOR_FN (cfun);
1169 :
1170 : /* An undefined local variable does not need to be very alive. */
1171 11312716 : if (ssa_undefined_value_p (ssa_name, false))
1172 : return;
1173 :
1174 : /* Visit each use of SSA_NAME and if it isn't in the same block as the def,
1175 : add it to the list of live on entry blocks. */
1176 45475132 : FOR_EACH_IMM_USE_FAST (use, imm_iter, ssa_name)
1177 : {
1178 24312374 : gimple *use_stmt = USE_STMT (use);
1179 24312374 : basic_block add_block = NULL;
1180 :
1181 24312374 : if (gimple_code (use_stmt) == GIMPLE_PHI)
1182 : {
1183 : /* Uses in PHI's are considered to be live at exit of the SRC block
1184 : as this is where a copy would be inserted. Check to see if it is
1185 : defined in that block, or whether its live on entry. */
1186 5784712 : int index = PHI_ARG_INDEX_FROM_USE (use);
1187 5784712 : edge e = gimple_phi_arg_edge (as_a <gphi *> (use_stmt), index);
1188 5784712 : if (e->src != def_bb && region_contains_p (live->map, e->src))
1189 1826764 : add_block = e->src;
1190 : }
1191 18527662 : else if (is_gimple_debug (use_stmt))
1192 4831387 : continue;
1193 : else
1194 : {
1195 : /* If its not defined in this block, its live on entry. */
1196 13696275 : basic_block use_bb = gimple_bb (use_stmt);
1197 13696275 : if (use_bb != def_bb && region_contains_p (live->map, use_bb))
1198 : add_block = use_bb;
1199 : }
1200 :
1201 : /* If there was a live on entry use, set the bit. */
1202 10707607 : if (add_block)
1203 10707607 : bitmap_set_bit (&live->livein[add_block->index], p);
1204 10581379 : }
1205 : }
1206 :
1207 :
1208 : /* Calculate the live on exit vectors based on the entry info in LIVEINFO. */
1209 :
1210 : static void
1211 1298478 : calculate_live_on_exit (tree_live_info_p liveinfo)
1212 : {
1213 1298478 : basic_block bb;
1214 1298478 : edge e;
1215 1298478 : edge_iterator ei;
1216 :
1217 : /* live on entry calculations used liveout vectors for defs, clear them. */
1218 13120320 : for (unsigned i = 0; liveinfo->map->vec_bbs.iterate (i, &bb); ++i)
1219 11821842 : bitmap_clear (&liveinfo->liveout[bb->index]);
1220 :
1221 : /* Set all the live-on-exit bits for uses in PHIs. */
1222 13120320 : FOR_EACH_BB_FN (bb, cfun)
1223 : {
1224 11821842 : gphi_iterator gsi;
1225 11821842 : size_t i;
1226 :
1227 : /* Mark the PHI arguments which are live on exit to the pred block. */
1228 14727384 : for (gsi = gsi_start_phis (bb); !gsi_end_p (gsi); gsi_next (&gsi))
1229 : {
1230 2905542 : gphi *phi = gsi.phi ();
1231 5811084 : if (virtual_operand_p (gimple_phi_result (phi)))
1232 5656 : continue;
1233 10001627 : for (i = 0; i < gimple_phi_num_args (phi); i++)
1234 : {
1235 7101741 : tree t = PHI_ARG_DEF (phi, i);
1236 7101741 : int p;
1237 :
1238 7101741 : if (TREE_CODE (t) != SSA_NAME)
1239 1289613 : continue;
1240 :
1241 5812128 : p = var_to_partition (liveinfo->map, t);
1242 5812128 : if (p == NO_PARTITION)
1243 1434 : continue;
1244 5810694 : e = gimple_phi_arg_edge (phi, i);
1245 5810694 : if (region_contains_p (liveinfo->map, e->src))
1246 5810439 : bitmap_set_bit (&liveinfo->liveout[e->src->index], p);
1247 : }
1248 : }
1249 :
1250 11821842 : if (!region_contains_p (liveinfo->map, bb))
1251 0 : continue;
1252 :
1253 : /* Add each successors live on entry to this bock live on exit. */
1254 29014997 : FOR_EACH_EDGE (e, ei, bb->succs)
1255 17193155 : if (region_contains_p (liveinfo->map, e->dest))
1256 15918151 : bitmap_ior_into (&liveinfo->liveout[bb->index],
1257 15918151 : live_on_entry (liveinfo, e->dest));
1258 : }
1259 1298478 : }
1260 :
1261 :
1262 : /* Given partition map MAP, calculate all the live on entry bitmaps for
1263 : each partition. Return a new live info object. */
1264 :
1265 : tree_live_info_p
1266 1298478 : calculate_live_ranges (var_map map, bool want_livein)
1267 : {
1268 1298478 : tree var;
1269 1298478 : unsigned i;
1270 1298478 : tree_live_info_p live;
1271 :
1272 1298478 : live = new_tree_live_info (map);
1273 13909672 : for (i = 0; i < num_var_partitions (map); i++)
1274 : {
1275 11312716 : var = partition_to_var (map, i);
1276 11312716 : if (var != NULL_TREE)
1277 11312716 : set_var_live_on_entry (var, live);
1278 : }
1279 :
1280 1298478 : live_worklist (live);
1281 :
1282 1298478 : if (flag_checking)
1283 1298461 : verify_live_on_entry (live);
1284 :
1285 1298478 : calculate_live_on_exit (live);
1286 :
1287 1298478 : if (!want_livein)
1288 : {
1289 1298478 : bitmap_obstack_release (&live->livein_obstack);
1290 1298478 : free (live->livein);
1291 1298478 : live->livein = NULL;
1292 : }
1293 :
1294 1298478 : return live;
1295 : }
1296 :
1297 : /* Data structure for compute_live_vars* functions. */
1298 :
1299 : struct compute_live_vars_data {
1300 : /* Vector of bitmaps for live vars indices at the end of basic blocks,
1301 : indexed by bb->index. ACTIVE[ENTRY_BLOCK] must be empty bitmap,
1302 : ACTIVE[EXIT_BLOCK] is used for STOP_AFTER. */
1303 : vec<bitmap_head> active;
1304 : /* Work bitmap of currently live variables. */
1305 : bitmap work;
1306 : /* Set of interesting variables. Variables with uids not in this
1307 : hash_map are not tracked. */
1308 : live_vars_map *vars;
1309 : };
1310 :
1311 : /* Callback for walk_stmt_load_store_addr_ops. If OP is a VAR_DECL with
1312 : uid set in DATA->vars, enter its corresponding index into bitmap
1313 : DATA->work. */
1314 :
1315 : static bool
1316 27270277 : compute_live_vars_visit (gimple *, tree op, tree, void *pdata)
1317 : {
1318 27270277 : compute_live_vars_data *data = (compute_live_vars_data *) pdata;
1319 27270277 : op = get_base_address (op);
1320 27270277 : if (op && VAR_P (op))
1321 18038881 : if (unsigned int *v = data->vars->get (DECL_UID (op)))
1322 14118745 : bitmap_set_bit (data->work, *v);
1323 27270277 : return false;
1324 : }
1325 :
1326 : /* Helper routine for compute_live_vars, calculating the sets of live
1327 : variables at the end of BB, leaving the result in DATA->work.
1328 : If STOP_AFTER is non-NULL, stop processing after that stmt. */
1329 :
1330 : static void
1331 13022918 : compute_live_vars_1 (basic_block bb, compute_live_vars_data *data,
1332 : gimple *stop_after)
1333 : {
1334 13022918 : edge e;
1335 13022918 : edge_iterator ei;
1336 13022918 : gimple_stmt_iterator gsi;
1337 13022918 : walk_stmt_load_store_addr_fn visit = compute_live_vars_visit;
1338 :
1339 13022918 : bitmap_clear (data->work);
1340 31594506 : FOR_EACH_EDGE (e, ei, bb->preds)
1341 18571588 : bitmap_ior_into (data->work, &data->active[e->src->index]);
1342 :
1343 18521920 : for (gsi = gsi_start_phis (bb); !gsi_end_p (gsi); gsi_next (&gsi))
1344 5499002 : walk_stmt_load_store_addr_ops (gsi_stmt (gsi), data, NULL, NULL, visit);
1345 169859767 : for (gsi = gsi_after_labels (bb); !gsi_end_p (gsi); gsi_next (&gsi))
1346 : {
1347 157107229 : gimple *stmt = gsi_stmt (gsi);
1348 :
1349 157107229 : if (gimple_clobber_p (stmt))
1350 : {
1351 3983296 : tree lhs = gimple_assign_lhs (stmt);
1352 3983296 : if (VAR_P (lhs))
1353 3736796 : if (unsigned int *v = data->vars->get (DECL_UID (lhs)))
1354 3122319 : bitmap_clear_bit (data->work, *v);
1355 : }
1356 153123933 : else if (!is_gimple_debug (stmt))
1357 41243709 : walk_stmt_load_store_addr_ops (stmt, data, visit, visit, visit);
1358 157107229 : if (stmt == stop_after)
1359 : break;
1360 : }
1361 13022918 : }
1362 :
1363 : /* For function FN and live_vars_map (hash map from DECL_UIDs to a dense set of
1364 : indexes of automatic variables VARS, compute which of those variables are
1365 : (might be) live at the end of each basic block. */
1366 :
1367 : vec<bitmap_head>
1368 346062 : compute_live_vars (struct function *fn, live_vars_map *vars)
1369 : {
1370 346062 : vec<bitmap_head> active;
1371 :
1372 : /* We approximate the live range of a stack variable by taking the first
1373 : mention of its name as starting point(s), and by the end-of-scope
1374 : death clobber added by gimplify as ending point(s) of the range.
1375 : This overapproximates in the case we for instance moved an address-taken
1376 : operation upward, without also moving a dereference to it upwards.
1377 : But it's conservatively correct as a variable never can hold values
1378 : before its name is mentioned at least once.
1379 :
1380 : We then do a mostly classical bitmap liveness algorithm. */
1381 :
1382 346062 : active.create (last_basic_block_for_fn (fn));
1383 346062 : active.quick_grow_cleared (last_basic_block_for_fn (fn));
1384 7389659 : for (int i = 0; i < last_basic_block_for_fn (fn); i++)
1385 7043597 : bitmap_initialize (&active[i], &bitmap_default_obstack);
1386 :
1387 346062 : bitmap work = BITMAP_ALLOC (NULL);
1388 :
1389 346062 : int *rpo = XNEWVEC (int, last_basic_block_for_fn (fn));
1390 346062 : int n_bbs = pre_and_rev_post_order_compute_fn (fn, NULL, rpo, false);
1391 :
1392 346062 : bool changed = true;
1393 346062 : compute_live_vars_data data = { active, work, vars };
1394 945967 : while (changed)
1395 : {
1396 : int i;
1397 : changed = false;
1398 13352443 : for (i = 0; i < n_bbs; i++)
1399 : {
1400 12752538 : basic_block bb = BASIC_BLOCK_FOR_FN (fn, rpo[i]);
1401 12752538 : compute_live_vars_1 (bb, &data, NULL);
1402 12752538 : if (bitmap_ior_into (&active[bb->index], work))
1403 4849663 : changed = true;
1404 : }
1405 : }
1406 :
1407 346062 : free (rpo);
1408 346062 : BITMAP_FREE (work);
1409 :
1410 346062 : return active;
1411 : }
1412 :
1413 : /* For ACTIVE computed by compute_live_vars, compute a bitmap of variables
1414 : live after the STOP_AFTER statement and return that bitmap. */
1415 :
1416 : bitmap
1417 270380 : live_vars_at_stmt (vec<bitmap_head> &active, live_vars_map *vars,
1418 : gimple *stop_after)
1419 : {
1420 270380 : bitmap work = BITMAP_ALLOC (NULL);
1421 270380 : compute_live_vars_data data = { active, work, vars };
1422 270380 : basic_block bb = gimple_bb (stop_after);
1423 270380 : compute_live_vars_1 (bb, &data, stop_after);
1424 270380 : return work;
1425 : }
1426 :
1427 : /* Destroy what compute_live_vars has returned when it is no longer needed. */
1428 :
1429 : void
1430 346062 : destroy_live_vars (vec<bitmap_head> &active)
1431 : {
1432 346062 : unsigned len = active.length ();
1433 7389659 : for (unsigned i = 0; i < len; i++)
1434 7043597 : bitmap_clear (&active[i]);
1435 :
1436 346062 : active.release ();
1437 346062 : }
1438 :
1439 : /* Output partition map MAP to file F. */
1440 :
1441 : void
1442 356 : dump_var_map (FILE *f, var_map map)
1443 : {
1444 356 : int t;
1445 356 : unsigned x, y;
1446 356 : int p;
1447 :
1448 356 : fprintf (f, "\nPartition map \n\n");
1449 :
1450 1810 : for (x = 0; x < map->num_partitions; x++)
1451 : {
1452 1098 : if (map->view_to_partition != NULL)
1453 465 : p = map->view_to_partition[x];
1454 : else
1455 633 : p = x;
1456 :
1457 1098 : if (ssa_name (p) == NULL_TREE
1458 2031 : || virtual_operand_p (ssa_name (p)))
1459 376 : continue;
1460 :
1461 : t = 0;
1462 9754 : for (y = 1; y < num_ssa_names; y++)
1463 : {
1464 9032 : p = partition_find (map->var_partition, y);
1465 9032 : if (map->partition_to_view)
1466 5711 : p = map->partition_to_view[p];
1467 9032 : if (p == (int)x)
1468 : {
1469 754 : if (t++ == 0)
1470 : {
1471 722 : fprintf (f, "Partition %d (", x);
1472 722 : print_generic_expr (f, partition_to_var (map, p), TDF_SLIM);
1473 722 : fprintf (f, " - ");
1474 : }
1475 754 : fprintf (f, "%d ", y);
1476 : }
1477 : }
1478 722 : if (t != 0)
1479 722 : fprintf (f, ")\n");
1480 : }
1481 356 : fprintf (f, "\n");
1482 356 : }
1483 :
1484 :
1485 : /* Generic dump for the above. */
1486 :
1487 : DEBUG_FUNCTION void
1488 0 : debug (_var_map &ref)
1489 : {
1490 0 : dump_var_map (stderr, &ref);
1491 0 : }
1492 :
1493 : DEBUG_FUNCTION void
1494 0 : debug (_var_map *ptr)
1495 : {
1496 0 : if (ptr)
1497 0 : debug (*ptr);
1498 : else
1499 0 : fprintf (stderr, "<nil>\n");
1500 0 : }
1501 :
1502 :
1503 : /* Output live range info LIVE to file F, controlled by FLAG. */
1504 :
1505 : void
1506 64 : dump_live_info (FILE *f, tree_live_info_p live, int flag)
1507 : {
1508 64 : basic_block bb;
1509 64 : unsigned i;
1510 64 : var_map map = live->map;
1511 64 : bitmap_iterator bi;
1512 :
1513 64 : if ((flag & LIVEDUMP_ENTRY) && live->livein)
1514 : {
1515 0 : FOR_EACH_BB_FN (bb, cfun)
1516 : {
1517 0 : fprintf (f, "\nLive on entry to BB%d : ", bb->index);
1518 0 : EXECUTE_IF_SET_IN_BITMAP (&live->livein[bb->index], 0, i, bi)
1519 : {
1520 0 : print_generic_expr (f, partition_to_var (map, i), TDF_SLIM);
1521 0 : fprintf (f, " ");
1522 : }
1523 0 : fprintf (f, "\n");
1524 : }
1525 : }
1526 :
1527 64 : if ((flag & LIVEDUMP_EXIT) && live->liveout)
1528 : {
1529 0 : FOR_EACH_BB_FN (bb, cfun)
1530 : {
1531 0 : fprintf (f, "\nLive on exit from BB%d : ", bb->index);
1532 0 : EXECUTE_IF_SET_IN_BITMAP (&live->liveout[bb->index], 0, i, bi)
1533 : {
1534 0 : print_generic_expr (f, partition_to_var (map, i), TDF_SLIM);
1535 0 : fprintf (f, " ");
1536 : }
1537 0 : fprintf (f, "\n");
1538 : }
1539 : }
1540 64 : }
1541 :
1542 :
1543 : /* Generic dump for the above. */
1544 :
1545 : DEBUG_FUNCTION void
1546 0 : debug (tree_live_info_d &ref)
1547 : {
1548 0 : dump_live_info (stderr, &ref, 0);
1549 0 : }
1550 :
1551 : DEBUG_FUNCTION void
1552 0 : debug (tree_live_info_d *ptr)
1553 : {
1554 0 : if (ptr)
1555 0 : debug (*ptr);
1556 : else
1557 0 : fprintf (stderr, "<nil>\n");
1558 0 : }
1559 :
1560 :
1561 : /* Verify that the info in LIVE matches the current cfg. */
1562 :
1563 : static void
1564 1298461 : verify_live_on_entry (tree_live_info_p live)
1565 : {
1566 1298461 : unsigned i;
1567 1298461 : tree var;
1568 1298461 : gimple *stmt;
1569 1298461 : basic_block bb;
1570 1298461 : edge e;
1571 1298461 : int num;
1572 1298461 : edge_iterator ei;
1573 1298461 : var_map map = live->map;
1574 :
1575 : /* Check for live on entry partitions and report those with a DEF in
1576 : the program. This will typically mean an optimization has done
1577 : something wrong. */
1578 1298461 : bb = ENTRY_BLOCK_PTR_FOR_FN (cfun);
1579 1298461 : num = 0;
1580 2596922 : FOR_EACH_EDGE (e, ei, bb->succs)
1581 : {
1582 1298461 : int entry_block = e->dest->index;
1583 1298461 : if (!region_contains_p (live->map, e->dest))
1584 0 : continue;
1585 12611121 : for (i = 0; i < (unsigned)num_var_partitions (map); i++)
1586 : {
1587 11312660 : basic_block tmp;
1588 11312660 : tree d = NULL_TREE;
1589 11312660 : bitmap loe;
1590 11312660 : var = partition_to_var (map, i);
1591 11312660 : stmt = SSA_NAME_DEF_STMT (var);
1592 11312660 : tmp = gimple_bb (stmt);
1593 11312660 : if (SSA_NAME_VAR (var))
1594 7969996 : d = ssa_default_def (cfun, SSA_NAME_VAR (var));
1595 :
1596 11312660 : loe = live_on_entry (live, e->dest);
1597 11312660 : if (loe && bitmap_bit_p (loe, i))
1598 : {
1599 1973779 : if (!gimple_nop_p (stmt))
1600 : {
1601 0 : num++;
1602 0 : print_generic_expr (stderr, var, TDF_SLIM);
1603 0 : fprintf (stderr, " is defined ");
1604 0 : if (tmp)
1605 0 : fprintf (stderr, " in BB%d, ", tmp->index);
1606 0 : fprintf (stderr, "by:\n");
1607 0 : print_gimple_stmt (stderr, stmt, 0, TDF_SLIM);
1608 0 : fprintf (stderr, "\nIt is also live-on-entry to entry BB %d",
1609 : entry_block);
1610 0 : fprintf (stderr, " So it appears to have multiple defs.\n");
1611 : }
1612 : else
1613 : {
1614 1973779 : if (d != var)
1615 : {
1616 0 : num++;
1617 0 : print_generic_expr (stderr, var, TDF_SLIM);
1618 0 : fprintf (stderr, " is live-on-entry to BB%d ",
1619 : entry_block);
1620 0 : if (d)
1621 : {
1622 0 : fprintf (stderr, " but is not the default def of ");
1623 0 : print_generic_expr (stderr, d, TDF_SLIM);
1624 0 : fprintf (stderr, "\n");
1625 : }
1626 : else
1627 0 : fprintf (stderr, " and there is no default def.\n");
1628 : }
1629 : }
1630 : }
1631 : else
1632 9338881 : if (d == var)
1633 : {
1634 : /* An undefined local variable does not need to be very
1635 : alive. */
1636 1712078 : if (ssa_undefined_value_p (var, false))
1637 1712078 : continue;
1638 :
1639 : /* The only way this var shouldn't be marked live on entry is
1640 : if it occurs in a PHI argument of the block. */
1641 986791 : size_t z;
1642 986791 : bool ok = false;
1643 986791 : gphi_iterator gsi;
1644 986791 : for (gsi = gsi_start_phis (e->dest);
1645 987026 : !gsi_end_p (gsi) && !ok;
1646 235 : gsi_next (&gsi))
1647 : {
1648 235 : gphi *phi = gsi.phi ();
1649 470 : if (virtual_operand_p (gimple_phi_result (phi)))
1650 0 : continue;
1651 368 : for (z = 0; z < gimple_phi_num_args (phi); z++)
1652 303 : if (var == gimple_phi_arg_def (phi, z))
1653 : {
1654 : ok = true;
1655 : break;
1656 : }
1657 : }
1658 986791 : if (ok)
1659 170 : continue;
1660 : /* Expand adds unused default defs for PARM_DECLs and
1661 : RESULT_DECLs. They're ok. */
1662 986621 : if (has_zero_uses (var)
1663 986621 : && SSA_NAME_VAR (var)
1664 1973242 : && !VAR_P (SSA_NAME_VAR (var)))
1665 986621 : continue;
1666 0 : num++;
1667 0 : print_generic_expr (stderr, var, TDF_SLIM);
1668 0 : fprintf (stderr, " is not marked live-on-entry to entry BB%d ",
1669 : entry_block);
1670 0 : fprintf (stderr, "but it is a default def so it should be.\n");
1671 : }
1672 : }
1673 : }
1674 1298461 : gcc_assert (num <= 0);
1675 1298461 : }
1676 :
1677 :
1678 : /* Virtual operand liveness analysis data init. */
1679 :
1680 : void
1681 196760 : virtual_operand_live::init ()
1682 : {
1683 196760 : liveout = XCNEWVEC (tree, last_basic_block_for_fn (cfun) + 1);
1684 196760 : liveout[ENTRY_BLOCK] = ssa_default_def (cfun, gimple_vop (cfun));
1685 196760 : }
1686 :
1687 : /* Compute live-in of BB from cached live-out. */
1688 :
1689 : tree
1690 1801610 : virtual_operand_live::get_live_in (basic_block bb)
1691 : {
1692 : /* A virtual PHI is a convenient cache for live-in. */
1693 1801610 : gphi *phi = get_virtual_phi (bb);
1694 1801610 : if (phi)
1695 571216 : return gimple_phi_result (phi);
1696 :
1697 1230394 : if (!liveout)
1698 196760 : init ();
1699 :
1700 : /* Since we don't have a virtual PHI and we don't know whether there's
1701 : a downstream virtual use (and thus PHIs are inserted where necessary)
1702 : we now have to check each incoming edge live-out. */
1703 1230394 : edge_iterator ei;
1704 1230394 : edge e;
1705 1230394 : tree livein = NULL_TREE;
1706 1230394 : bool first = true;
1707 2684407 : FOR_EACH_EDGE (e, ei, bb->preds)
1708 1454044 : if (e->flags & EDGE_DFS_BACK)
1709 : /* We can ignore backedges since if there's a def there it would
1710 : have forced a PHI in the source because it also acts as use
1711 : downstream. */
1712 71215 : continue;
1713 1382829 : else if (first)
1714 : {
1715 1230394 : livein = get_live_out (e->src);
1716 1230394 : first = false;
1717 : }
1718 152435 : else if (get_live_out (e->src) != livein)
1719 : /* When there's no virtual use downstream this indicates a point
1720 : where we'd insert a PHI merging the different live virtual
1721 : operands. */
1722 : return NULL_TREE;
1723 :
1724 : return livein;
1725 : }
1726 :
1727 : /* Compute live-out of BB. */
1728 :
1729 : tree
1730 1382829 : virtual_operand_live::get_live_out (basic_block bb)
1731 : {
1732 1382829 : if (!liveout)
1733 0 : init ();
1734 :
1735 1382829 : if (liveout[bb->index])
1736 : return liveout[bb->index];
1737 :
1738 801196 : tree lo = NULL_TREE;
1739 4035607 : for (auto gsi = gsi_last_bb (bb); !gsi_end_p (gsi); gsi_prev (&gsi))
1740 : {
1741 2970767 : gimple *stmt = gsi_stmt (gsi);
1742 3883301 : if (gimple_vdef (stmt))
1743 : {
1744 : lo = gimple_vdef (stmt);
1745 : break;
1746 : }
1747 3581813 : if (gimple_vuse (stmt))
1748 : {
1749 : lo = gimple_vuse (stmt);
1750 : break;
1751 : }
1752 : }
1753 801196 : if (!lo)
1754 263644 : lo = get_live_in (bb);
1755 801196 : liveout[bb->index] = lo;
1756 801196 : return lo;
1757 : }
|