/* IPA reference lists. Copyright (C) 2010 Free Software Foundation, Inc. Contributed by Jan Hubicka This file is part of GCC. GCC is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3, or (at your option) any later version. GCC is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with GCC; see the file COPYING3. If not see . */ /* Return callgraph node REF is refering. */ static inline struct cgraph_node * ipa_ref_node (struct ipa_ref *ref) { gcc_assert (ref->refered_type == IPA_REF_CGRAPH); return ref->refered.cgraph_node; } /* Return varpool node REF is refering. */ static inline struct varpool_node * ipa_ref_varpool_node (struct ipa_ref *ref) { gcc_assert (ref->refered_type == IPA_REF_VARPOOL); return ref->refered.varpool_node; } /* Return cgraph node REF is in. */ static inline struct cgraph_node * ipa_ref_refering_node (struct ipa_ref *ref) { gcc_assert (ref->refering_type == IPA_REF_CGRAPH); return ref->refering.cgraph_node; } /* Return varpool node REF is in. */ static inline struct varpool_node * ipa_ref_refering_varpool_node (struct ipa_ref *ref) { gcc_assert (ref->refering_type == IPA_REF_VARPOOL); return ref->refering.varpool_node; } /* Return reference list REF is in. */ static inline struct ipa_ref_list * ipa_ref_refering_ref_list (struct ipa_ref *ref) { if (ref->refering_type == IPA_REF_CGRAPH) return &ipa_ref_refering_node (ref)->ref_list; else return &ipa_ref_refering_varpool_node (ref)->ref_list; } /* Return reference list REF is in. */ static inline struct ipa_ref_list * ipa_ref_refered_ref_list (struct ipa_ref *ref) { if (ref->refered_type == IPA_REF_CGRAPH) return &ipa_ref_node (ref)->ref_list; else return &ipa_ref_varpool_node (ref)->ref_list; } /* Return first reference in LIST or NULL if empty. */ static inline struct ipa_ref * ipa_ref_list_first_reference (struct ipa_ref_list *list) { if (!VEC_length (ipa_ref_t, list->references)) return NULL; return VEC_index (ipa_ref_t, list->references, 0); } /* Return first refering ref in LIST or NULL if empty. */ static inline struct ipa_ref * ipa_ref_list_first_refering (struct ipa_ref_list *list) { if (!VEC_length (ipa_ref_ptr, list->refering)) return NULL; return VEC_index (ipa_ref_ptr, list->refering, 0); } /* Clear reference list. */ static inline void ipa_empty_ref_list (struct ipa_ref_list *list) { list->refering = NULL; list->references = NULL; } /* Clear reference list. */ static inline unsigned int ipa_ref_list_nreferences (struct ipa_ref_list *list) { return VEC_length (ipa_ref_t, list->references); } #define ipa_ref_list_reference_iterate(L,I,P) \ VEC_iterate(ipa_ref_t, (L)->references, (I), (P)) #define ipa_ref_list_refering_iterate(L,I,P) \ VEC_iterate(ipa_ref_ptr, (L)->refering, (I), (P))