1 /* Graphite polyhedral representation.
2 Copyright (C) 2009 Free Software Foundation, Inc.
3 Contributed by Sebastian Pop <sebastian.pop@amd.com> and
4 Tobias Grosser <grosser@fim.uni-passau.de>.
6 This file is part of GCC.
8 GCC is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3, or (at your option)
13 GCC is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with GCC; see the file COPYING3. If not see
20 <http://www.gnu.org/licenses/>. */
22 #ifndef GCC_GRAPHITE_POLY_H
23 #define GCC_GRAPHITE_POLY_H
25 typedef struct poly_dr *poly_dr_p;
27 DEF_VEC_ALLOC_P (poly_dr_p, heap);
29 typedef struct poly_bb *poly_bb_p;
31 DEF_VEC_ALLOC_P (poly_bb_p, heap);
33 typedef struct scop *scop_p;
35 DEF_VEC_ALLOC_P (scop_p, heap);
37 typedef ppl_dimension_type graphite_dim_t;
39 static inline graphite_dim_t pbb_dim_iter_domain (const struct poly_bb *);
40 static inline graphite_dim_t pbb_nb_params (const struct poly_bb *);
41 static inline graphite_dim_t scop_nb_params (scop_p);
43 /* A data reference can write or read some memory or we
44 just know it may write some memory. */
48 /* PDR_MAY_READs are represented using PDR_READS. This does not
49 limit the expressiveness. */
56 /* An identifier for this PDR. */
59 /* The number of data refs identical to this one in the PBB. */
62 /* A pointer to compiler's data reference description. */
65 /* A pointer to the PBB that contains this data reference. */
68 enum poly_dr_type type;
70 /* The access polyhedron contains the polyhedral space this data
71 reference will access.
73 The polyhedron contains these dimensions:
76 Every memory access is classified in at least one alias set.
78 - The subscripts (s_0, ..., s_n):
79 The memory is accessed using zero or more subscript dimensions.
81 - The iteration domain (variables and parameters)
83 Do not hardcode the dimensions. Use the following accessor functions:
97 | if (unknown_function ())
104 The data access A[i][j+k] in alias set "5" is described like this:
109 | 0 -1 -1 0 0 1 0 = 0
110 | 0 0 0 0 1 0 0 >= 0 # The last four lines describe the
111 | 0 0 0 0 0 1 0 >= 0 # array size.
112 | 0 0 0 0 -1 0 1335 >= 0
113 | 0 0 0 0 0 -1 123 >= 0
115 The pointer "*p" in alias set "5" and "7" is described as a union of
129 "*p" accesses all of the object allocated with 'malloc'.
131 The scalar data access "m" is represented as an array with zero subscript
136 ppl_Pointset_Powerset_C_Polyhedron_t accesses;
138 /* Data reference's base object set number, we must assure 2 pdrs are in the
139 same base object set before dependency checking. */
140 int dr_base_object_set;
142 /* The number of subscripts. */
143 graphite_dim_t nb_subscripts;
146 #define PDR_ID(PDR) (PDR->id)
147 #define PDR_NB_REFS(PDR) (PDR->nb_refs)
148 #define PDR_CDR(PDR) (PDR->compiler_dr)
149 #define PDR_PBB(PDR) (PDR->pbb)
150 #define PDR_TYPE(PDR) (PDR->type)
151 #define PDR_ACCESSES(PDR) (PDR->accesses)
152 #define PDR_BASE_OBJECT_SET(PDR) (PDR->dr_base_object_set)
153 #define PDR_NB_SUBSCRIPTS(PDR) (PDR->nb_subscripts)
155 void new_poly_dr (poly_bb_p, int, ppl_Pointset_Powerset_C_Polyhedron_t,
156 enum poly_dr_type, void *, graphite_dim_t);
157 void free_poly_dr (poly_dr_p);
158 void debug_pdr (poly_dr_p);
159 void print_pdr (FILE *, poly_dr_p);
160 static inline scop_p pdr_scop (poly_dr_p pdr);
162 /* The dimension of the PDR_ACCESSES polyhedron of PDR. */
164 static inline ppl_dimension_type
165 pdr_dim (poly_dr_p pdr)
167 ppl_dimension_type dim;
168 ppl_Pointset_Powerset_C_Polyhedron_space_dimension (PDR_ACCESSES (pdr),
173 /* The dimension of the iteration domain of the scop of PDR. */
175 static inline ppl_dimension_type
176 pdr_dim_iter_domain (poly_dr_p pdr)
178 return pbb_dim_iter_domain (PDR_PBB (pdr));
181 /* The number of parameters of the scop of PDR. */
183 static inline ppl_dimension_type
184 pdr_nb_params (poly_dr_p pdr)
186 return scop_nb_params (pdr_scop (pdr));
189 /* The dimension of the alias set in PDR. */
191 static inline ppl_dimension_type
192 pdr_alias_set_dim (poly_dr_p pdr)
194 poly_bb_p pbb = PDR_PBB (pdr);
196 return pbb_dim_iter_domain (pbb) + pbb_nb_params (pbb);
199 /* The dimension in PDR containing subscript S. */
201 static inline ppl_dimension_type
202 pdr_subscript_dim (poly_dr_p pdr, graphite_dim_t s)
204 poly_bb_p pbb = PDR_PBB (pdr);
206 return pbb_dim_iter_domain (pbb) + pbb_nb_params (pbb) + 1 + s;
209 /* The dimension in PDR containing the loop iterator ITER. */
211 static inline ppl_dimension_type
212 pdr_iterator_dim (poly_dr_p pdr ATTRIBUTE_UNUSED, graphite_dim_t iter)
217 /* The dimension in PDR containing parameter PARAM. */
219 static inline ppl_dimension_type
220 pdr_parameter_dim (poly_dr_p pdr, graphite_dim_t param)
222 poly_bb_p pbb = PDR_PBB (pdr);
224 return pbb_dim_iter_domain (pbb) + param;
227 /* Returns true when PDR is a "read". */
230 pdr_read_p (poly_dr_p pdr)
232 return PDR_TYPE (pdr) == PDR_READ;
235 /* Returns true when PDR is a "write". */
238 pdr_write_p (poly_dr_p pdr)
240 return PDR_TYPE (pdr) == PDR_WRITE;
243 /* Returns true when PDR is a "may write". */
246 pdr_may_write_p (poly_dr_p pdr)
248 return PDR_TYPE (pdr) == PDR_MAY_WRITE;
251 /* Return true when PDR1 and PDR2 are similar data accesses: they have
252 the same base array, and the same access functions. */
255 same_pdr_p (poly_dr_p pdr1, poly_dr_p pdr2)
257 return PDR_TYPE (pdr1) == PDR_TYPE (pdr2)
258 && PDR_NB_SUBSCRIPTS (pdr1) == PDR_NB_SUBSCRIPTS (pdr2)
259 && PDR_BASE_OBJECT_SET (pdr1) == PDR_BASE_OBJECT_SET (pdr2);
262 typedef struct poly_scattering *poly_scattering_p;
264 struct poly_scattering
266 /* The scattering function containing the transformations. */
267 ppl_Polyhedron_t scattering;
269 /* The number of local variables. */
270 int nb_local_variables;
272 /* The number of scattering dimensions. */
276 /* POLY_BB represents a blackbox in the polyhedral model. */
284 /* The iteration domain of this bb.
287 for (i = a - 7*b + 8; i <= 3*a + 13*b + 20; i++)
288 for (j = 2; j <= 2*i + 5; j++)
289 for (k = 0; k <= 5; k++)
292 Loop iterators: i, j, k
302 The number of variables in the DOMAIN may change and is not
303 related to the number of loops in the original code. */
304 ppl_Pointset_Powerset_C_Polyhedron_t domain;
306 /* The data references we access. */
307 VEC (poly_dr_p, heap) *drs;
309 /* The original scattering. */
310 poly_scattering_p original;
312 /* The transformed scattering. */
313 poly_scattering_p transformed;
315 /* A copy of the transformed scattering. */
316 poly_scattering_p saved;
318 /* True when the PDR duplicates have already been removed. */
319 bool pdr_duplicates_removed;
321 /* True when this PBB contains only a reduction statement. */
325 #define PBB_BLACK_BOX(PBB) ((gimple_bb_p) PBB->black_box)
326 #define PBB_SCOP(PBB) (PBB->scop)
327 #define PBB_DOMAIN(PBB) (PBB->domain)
328 #define PBB_DRS(PBB) (PBB->drs)
329 #define PBB_ORIGINAL(PBB) (PBB->original)
330 #define PBB_ORIGINAL_SCATTERING(PBB) (PBB->original->scattering)
331 #define PBB_TRANSFORMED(PBB) (PBB->transformed)
332 #define PBB_TRANSFORMED_SCATTERING(PBB) (PBB->transformed->scattering)
333 #define PBB_SAVED(PBB) (PBB->saved)
334 #define PBB_NB_LOCAL_VARIABLES(PBB) (PBB->transformed->nb_local_variables)
335 #define PBB_NB_SCATTERING_TRANSFORM(PBB) (PBB->transformed->nb_scattering)
336 #define PBB_PDR_DUPLICATES_REMOVED(PBB) (PBB->pdr_duplicates_removed)
337 #define PBB_IS_REDUCTION(PBB) (PBB->is_reduction)
339 extern void new_poly_bb (scop_p, void *, bool);
340 extern void free_poly_bb (poly_bb_p);
341 extern void debug_loop_vec (poly_bb_p);
342 extern void schedule_to_scattering (poly_bb_p, int);
343 extern void print_pbb_domain (FILE *, poly_bb_p);
344 extern void print_pbb (FILE *, poly_bb_p);
345 extern void print_scop_context (FILE *, scop_p);
346 extern void print_scop (FILE *, scop_p);
347 extern void debug_pbb_domain (poly_bb_p);
348 extern void debug_pbb (poly_bb_p);
349 extern void print_pdrs (FILE *, poly_bb_p);
350 extern void debug_pdrs (poly_bb_p);
351 extern void debug_scop_context (scop_p);
352 extern void debug_scop (scop_p);
353 extern void print_scop_params (FILE *, scop_p);
354 extern void debug_scop_params (scop_p);
355 extern void print_iteration_domain (FILE *, poly_bb_p);
356 extern void print_iteration_domains (FILE *, scop_p);
357 extern void debug_iteration_domain (poly_bb_p);
358 extern void debug_iteration_domains (scop_p);
359 extern bool scop_do_interchange (scop_p);
360 extern bool scop_do_strip_mine (scop_p);
361 extern void pbb_number_of_iterations (poly_bb_p, graphite_dim_t, Value);
362 extern void pbb_number_of_iterations_at_time (poly_bb_p, graphite_dim_t, Value);
363 extern void pbb_remove_duplicate_pdrs (poly_bb_p);
365 /* Return the number of write data references in PBB. */
368 number_of_write_pdrs (poly_bb_p pbb)
374 for (i = 0; VEC_iterate (poly_dr_p, PBB_DRS (pbb), i, pdr); i++)
375 if (PDR_TYPE (pdr) == PDR_WRITE)
381 /* The index of the PBB. */
384 pbb_index (poly_bb_p pbb)
386 return GBB_BB (PBB_BLACK_BOX (pbb))->index;
389 /* The loop of the PBB. */
392 pbb_loop (poly_bb_p pbb)
394 return gbb_loop (PBB_BLACK_BOX (pbb));
397 /* The scop that contains the PDR. */
400 pdr_scop (poly_dr_p pdr)
402 return PBB_SCOP (PDR_PBB (pdr));
405 /* Set black box of PBB to BLACKBOX. */
408 pbb_set_black_box (poly_bb_p pbb, void *black_box)
410 pbb->black_box = black_box;
413 /* The number of loops around PBB: the dimension of the iteration
416 static inline graphite_dim_t
417 pbb_dim_iter_domain (const struct poly_bb *pbb)
419 scop_p scop = PBB_SCOP (pbb);
420 ppl_dimension_type dim;
422 ppl_Pointset_Powerset_C_Polyhedron_space_dimension (PBB_DOMAIN (pbb), &dim);
423 return dim - scop_nb_params (scop);
426 /* The number of params defined in PBB. */
428 static inline graphite_dim_t
429 pbb_nb_params (const struct poly_bb *pbb)
431 scop_p scop = PBB_SCOP (pbb);
433 return scop_nb_params (scop);
436 /* The number of scattering dimensions in the SCATTERING polyhedron
437 of a PBB for a given SCOP. */
439 static inline graphite_dim_t
440 pbb_nb_scattering_orig (const struct poly_bb *pbb)
442 return 2 * pbb_dim_iter_domain (pbb) + 1;
445 /* The number of scattering dimensions in PBB. */
447 static inline graphite_dim_t
448 pbb_nb_scattering_transform (const struct poly_bb *pbb)
450 return PBB_NB_SCATTERING_TRANSFORM (pbb);
453 /* The number of dynamic scattering dimensions in PBB. */
455 static inline graphite_dim_t
456 pbb_nb_dynamic_scattering_transform (const struct poly_bb *pbb)
458 /* This function requires the 2d + 1 scattering format to be
459 invariant during all transformations. */
460 gcc_assert (PBB_NB_SCATTERING_TRANSFORM (pbb) % 2);
461 return PBB_NB_SCATTERING_TRANSFORM (pbb) / 2;
464 /* Returns the number of local variables used in the transformed
465 scattering polyhedron of PBB. */
467 static inline graphite_dim_t
468 pbb_nb_local_vars (const struct poly_bb *pbb)
470 /* For now we do not have any local variables, as we do not do strip
471 mining for example. */
472 return PBB_NB_LOCAL_VARIABLES (pbb);
475 /* The dimension in the domain of PBB containing the iterator ITER. */
477 static inline ppl_dimension_type
478 pbb_iterator_dim (poly_bb_p pbb ATTRIBUTE_UNUSED, graphite_dim_t iter)
483 /* The dimension in the domain of PBB containing the iterator ITER. */
485 static inline ppl_dimension_type
486 pbb_parameter_dim (poly_bb_p pbb, graphite_dim_t param)
489 + pbb_dim_iter_domain (pbb);
492 /* The dimension in the original scattering polyhedron of PBB
493 containing the scattering iterator SCATTER. */
495 static inline ppl_dimension_type
496 psco_scattering_dim (poly_bb_p pbb ATTRIBUTE_UNUSED, graphite_dim_t scatter)
498 gcc_assert (scatter < pbb_nb_scattering_orig (pbb));
502 /* The dimension in the transformed scattering polyhedron of PBB
503 containing the scattering iterator SCATTER. */
505 static inline ppl_dimension_type
506 psct_scattering_dim (poly_bb_p pbb ATTRIBUTE_UNUSED, graphite_dim_t scatter)
508 gcc_assert (scatter <= pbb_nb_scattering_transform (pbb));
512 ppl_dimension_type psct_scattering_dim_for_loop_depth (poly_bb_p,
515 /* The dimension in the transformed scattering polyhedron of PBB of
516 the local variable LV. */
518 static inline ppl_dimension_type
519 psct_local_var_dim (poly_bb_p pbb, graphite_dim_t lv)
521 gcc_assert (lv <= pbb_nb_local_vars (pbb));
522 return lv + pbb_nb_scattering_transform (pbb);
525 /* The dimension in the original scattering polyhedron of PBB
526 containing the loop iterator ITER. */
528 static inline ppl_dimension_type
529 psco_iterator_dim (poly_bb_p pbb, graphite_dim_t iter)
531 gcc_assert (iter < pbb_dim_iter_domain (pbb));
532 return iter + pbb_nb_scattering_orig (pbb);
535 /* The dimension in the transformed scattering polyhedron of PBB
536 containing the loop iterator ITER. */
538 static inline ppl_dimension_type
539 psct_iterator_dim (poly_bb_p pbb, graphite_dim_t iter)
541 gcc_assert (iter < pbb_dim_iter_domain (pbb));
543 + pbb_nb_scattering_transform (pbb)
544 + pbb_nb_local_vars (pbb);
547 /* The dimension in the original scattering polyhedron of PBB
548 containing parameter PARAM. */
550 static inline ppl_dimension_type
551 psco_parameter_dim (poly_bb_p pbb, graphite_dim_t param)
553 gcc_assert (param < pbb_nb_params (pbb));
555 + pbb_nb_scattering_orig (pbb)
556 + pbb_dim_iter_domain (pbb);
559 /* The dimension in the transformed scattering polyhedron of PBB
560 containing parameter PARAM. */
562 static inline ppl_dimension_type
563 psct_parameter_dim (poly_bb_p pbb, graphite_dim_t param)
565 gcc_assert (param < pbb_nb_params (pbb));
567 + pbb_nb_scattering_transform (pbb)
568 + pbb_nb_local_vars (pbb)
569 + pbb_dim_iter_domain (pbb);
572 /* The scattering dimension of PBB corresponding to the dynamic level
575 static inline ppl_dimension_type
576 psct_dynamic_dim (poly_bb_p pbb, graphite_dim_t level)
578 graphite_dim_t result;
579 result = 1 + 2 * level;
581 gcc_assert (result < pbb_nb_scattering_transform (pbb));
585 /* Adds to the transformed scattering polyhedron of PBB a new local
586 variable and returns its index. */
588 static inline graphite_dim_t
589 psct_add_local_variable (poly_bb_p pbb)
591 graphite_dim_t nlv = pbb_nb_local_vars (pbb);
592 ppl_dimension_type lv_column = psct_local_var_dim (pbb, nlv);
593 ppl_insert_dimensions (PBB_TRANSFORMED_SCATTERING (pbb), lv_column, 1);
594 PBB_NB_LOCAL_VARIABLES (pbb) += 1;
598 /* Adds a dimension to the transformed scattering polyhedron of PBB at
602 psct_add_scattering_dimension (poly_bb_p pbb, ppl_dimension_type index)
604 gcc_assert (index < pbb_nb_scattering_transform (pbb));
606 ppl_insert_dimensions (PBB_TRANSFORMED_SCATTERING (pbb), index, 1);
607 PBB_NB_SCATTERING_TRANSFORM (pbb) += 1;
610 typedef struct lst *lst_p;
612 DEF_VEC_ALLOC_P (lst_p, heap);
614 /* Loops and Statements Tree. */
617 /* LOOP_P is true when an LST node is a loop. */
620 /* A pointer to the loop that contains this node. */
623 /* Loop nodes contain a sequence SEQ of LST nodes, statements
624 contain a pointer to their polyhedral representation PBB. */
627 VEC (lst_p, heap) *seq;
631 #define LST_LOOP_P(LST) ((LST)->loop_p)
632 #define LST_LOOP_FATHER(LST) ((LST)->loop_father)
633 #define LST_PBB(LST) ((LST)->node.pbb)
634 #define LST_SEQ(LST) ((LST)->node.seq)
636 void scop_to_lst (scop_p);
637 void print_lst (FILE *, lst_p, int);
638 void debug_lst (lst_p);
640 /* Creates a new LST loop with SEQ. */
643 new_lst_loop (VEC (lst_p, heap) *seq)
645 lst_p lst = XNEW (struct lst);
649 LST_LOOP_P (lst) = true;
651 LST_LOOP_FATHER (lst) = NULL;
653 for (i = 0; VEC_iterate (lst_p, seq, i, l); i++)
654 LST_LOOP_FATHER (l) = lst;
659 /* Creates a new LST statement with PBB. */
662 new_lst_stmt (poly_bb_p pbb)
664 lst_p lst = XNEW (struct lst);
666 LST_LOOP_P (lst) = false;
668 LST_LOOP_FATHER (lst) = NULL;
672 /* Returns a copy of LST. */
680 if (LST_LOOP_P (lst))
681 return new_lst_loop (VEC_copy (lst_p, heap, LST_SEQ (lst)));
683 return new_lst_stmt (LST_PBB (lst));
686 /* Returns the loop depth of LST. */
689 lst_depth (lst_p lst)
694 return lst_depth (LST_LOOP_FATHER (lst)) + 1;
697 /* Returns the Dewey number for LST. */
700 lst_dewey_number (lst_p lst)
708 if (!LST_LOOP_FATHER (lst))
711 for (i = 0; VEC_iterate (lst_p, LST_SEQ (LST_LOOP_FATHER (lst)), i, l); i++)
718 /* A SCOP is a Static Control Part of the program, simple enough to be
719 represented in polyhedral form. */
722 /* A SCOP is defined as a SESE region. */
725 /* Number of parameters in SCoP. */
726 graphite_dim_t nb_params;
728 /* All the basic blocks in this scop that contain memory references
729 and that will be represented as statements in the polyhedral
731 VEC (poly_bb_p, heap) *bbs;
733 /* Original and transformed schedules. */
734 lst_p original_schedule, transformed_schedule;
736 /* Data dependence graph for this SCoP. */
737 struct graph *dep_graph;
739 /* The context describes known restrictions concerning the parameters
740 and relations in between the parameters.
742 void f (int8_t a, uint_16_t b) {
747 Here we can add these restrictions to the context:
752 ppl_Pointset_Powerset_C_Polyhedron_t context;
754 /* A hashtable of the data dependence relations for the original
756 htab_t original_pddrs;
759 #define SCOP_BBS(S) (S->bbs)
760 #define SCOP_REGION(S) ((sese) S->region)
761 #define SCOP_DEP_GRAPH(S) (S->dep_graph)
762 #define SCOP_CONTEXT(S) (S->context)
763 #define SCOP_ORIGINAL_PDDRS(S) (S->original_pddrs)
764 #define SCOP_ORIGINAL_SCHEDULE(S) (S->original_schedule)
765 #define SCOP_TRANSFORMED_SCHEDULE(S) (S->transformed_schedule)
767 extern scop_p new_scop (void *);
768 extern void free_scop (scop_p);
769 extern void free_scops (VEC (scop_p, heap) *);
770 extern void print_generated_program (FILE *, scop_p);
771 extern void debug_generated_program (scop_p);
772 extern void print_scattering_function (FILE *, poly_bb_p);
773 extern void print_scattering_functions (FILE *, scop_p);
774 extern void debug_scattering_function (poly_bb_p);
775 extern void debug_scattering_functions (scop_p);
776 extern int scop_max_loop_depth (scop_p);
777 extern int unify_scattering_dimensions (scop_p);
778 extern bool apply_poly_transforms (scop_p);
779 extern bool graphite_legal_transform (scop_p);
781 /* Set the region of SCOP to REGION. */
784 scop_set_region (scop_p scop, void *region)
786 scop->region = region;
789 /* Returns the number of parameters for SCOP. */
791 static inline graphite_dim_t
792 scop_nb_params (scop_p scop)
794 return scop->nb_params;
797 /* Set the number of params of SCOP to NB_PARAMS. */
800 scop_set_nb_params (scop_p scop, graphite_dim_t nb_params)
802 scop->nb_params = nb_params;
805 /* Allocates a new empty poly_scattering structure. */
807 static inline poly_scattering_p
808 poly_scattering_new (void)
810 poly_scattering_p res = XNEW (struct poly_scattering);
812 res->scattering = NULL;
813 res->nb_local_variables = 0;
814 res->nb_scattering = 0;
818 /* Free a poly_scattering structure. */
821 poly_scattering_free (poly_scattering_p s)
823 ppl_delete_Polyhedron (s->scattering);
827 /* Copies S and return a new scattering. */
829 static inline poly_scattering_p
830 poly_scattering_copy (poly_scattering_p s)
832 poly_scattering_p res = poly_scattering_new ();
834 ppl_new_C_Polyhedron_from_C_Polyhedron (&(res->scattering), s->scattering);
835 res->nb_local_variables = s->nb_local_variables;
836 res->nb_scattering = s->nb_scattering;
840 /* Saves the transformed scattering of PBB. */
843 store_scattering_pbb (poly_bb_p pbb)
845 gcc_assert (PBB_TRANSFORMED (pbb));
848 poly_scattering_free (PBB_SAVED (pbb));
850 PBB_SAVED (pbb) = poly_scattering_copy (PBB_TRANSFORMED (pbb));
853 /* Saves the scattering for all the pbbs in the SCOP. */
856 store_scattering (scop_p scop)
861 for (i = 0; VEC_iterate (poly_bb_p, SCOP_BBS (scop), i, pbb); i++)
862 store_scattering_pbb (pbb);
865 /* Restores the scattering of PBB. */
868 restore_scattering_pbb (poly_bb_p pbb)
870 gcc_assert (PBB_SAVED (pbb));
872 poly_scattering_free (PBB_TRANSFORMED (pbb));
873 PBB_TRANSFORMED (pbb) = poly_scattering_copy (PBB_SAVED (pbb));
876 /* Restores the scattering for all the pbbs in the SCOP. */
879 restore_scattering (scop_p scop)
884 for (i = 0; VEC_iterate (poly_bb_p, SCOP_BBS (scop), i, pbb); i++)
885 restore_scattering_pbb (pbb);