X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fadt%2Fset.c;h=6411e38efe6f7c5e602b79706cec73424966114d;hb=f2edb6301aa7affb0673e76436d9b4dbaef6b9e1;hp=55aafc417086b04d540bae8ba51ca49a28d75085;hpb=bddff226147ddaba6596a92c96d8059399bfbf57;p=libfirm diff --git a/ir/adt/set.c b/ir/adt/set.c index 55aafc417..6411e38ef 100644 --- a/ir/adt/set.c +++ b/ir/adt/set.c @@ -1,13 +1,27 @@ /* - * Project: libFIRM - * File name: ir/adt/set.c - * Purpose: Set --- collection of entries that are unique wrt to a key. - * Author: Markus Armbruster - * Modified by: - * Created: 1999 by getting from fiasco - * CVS-ID: $Id$ - * Copyright: (c) 1995, 1996 Markus Armbruster - * Licence: This file protected by GPL - GNU GENERAL PUBLIC LICENSE. + * Copyright (C) 1995-2008 University of Karlsruhe. All right reserved. + * + * This file is part of libFirm. + * + * This file may be distributed and/or modified under the terms of the + * GNU General Public License version 2 as published by the Free Software + * Foundation and appearing in the file LICENSE.GPL included in the + * packaging of this file. + * + * Licensees holding valid libFirm Professional Edition licenses may use + * this file in accordance with the libFirm Commercial License. + * Agreement provided with the Software. + * + * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE + * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR + * PURPOSE. + */ + +/** + * @file + * @brief implementation of set + * @author Markus Armbruster + * @version $Id$ */ /* This code is derived from: @@ -29,16 +43,11 @@ TODO: Fix Esmond's ugly MixedCapsIdentifiers ;-> */ - -/* $Id$ */ - #ifdef HAVE_CONFIG_H # include "config.h" #endif -/* bcopy is not ISO C * -#define bcopy(X, Y, Z) memcpy((Y), (X), (Z)) -*/ +#include "firm_config.h" #ifdef PSET # define SET pset @@ -179,7 +188,7 @@ SET * (PMANGLE(new)) (MANGLEP(cmp_fun) cmp, int nslots) { int i; - SET *table = xmalloc (sizeof (SET)); + SET *table = XMALLOC(SET); if (nslots > SEGMENT_SIZE * DIRECTORY_SIZE) nslots = DIRECTORY_SIZE; @@ -550,6 +559,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 *