X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fadt%2Fset.c;h=f2e4dd756aeb5ded6fbd65af43491cd881012cd7;hb=d0d85962ef52c14950db90e5981a7bea36023ab3;hp=9b2e031f635f48a997f37952b6d5181a382bfd8b;hpb=cd117a5476fd8d34f117263e18e694c094f73b23;p=libfirm

diff --git a/ir/adt/set.c b/ir/adt/set.c
index 9b2e031f6..f2e4dd756 100644
--- a/ir/adt/set.c
+++ b/ir/adt/set.c
@@ -550,6 +550,13 @@ MANGLEP(entry) *
   return pset_hinsert (se, key, hash);
 }
 
+void pset_insert_pset_ptr(pset *target, pset *src) {
+  void *elt;
+  for (elt = pset_first(src); elt; elt = pset_next(src)) {
+    pset_insert_ptr(target, elt);
+  }
+}
+
 #else /* !PSET */
 
 void *