X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flibpspp%2Fabt.c;h=ae746183021203605efa169e6989c7cc05844ec3;hb=5b5099296b3c7212623991de8920e1459e234922;hp=12da494a025fbc81c003b788b88aac9ca76c1669;hpb=f5c108becd49d78f4898cab11352291f5689d24e;p=pspp diff --git a/src/libpspp/abt.c b/src/libpspp/abt.c index 12da494a02..ae74618302 100644 --- a/src/libpspp/abt.c +++ b/src/libpspp/abt.c @@ -1,20 +1,18 @@ -/* PSPP - computes sample statistics. - Copyright (C) 2007 Free Software Foundation, Inc. +/* PSPP - a program for statistical analysis. + Copyright (C) 2007, 2009, 2011 Free Software Foundation, Inc. - This program 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 2 of the - License, or (at your option) any later version. + This program 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 of the License, or + (at your option) any later version. - This program 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. + This program 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 this program; if not, write to the Free Software - Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA - 02110-1301, USA. */ + along with this program. If not, see . */ /* Augmented binary tree (ABT) data structure. */ @@ -30,11 +28,12 @@ #include #endif -#include +#include "libpspp/abt.h" #include -#include +#include "libpspp/cast.h" +#include "libpspp/assertion.h" static struct abt_node **down_link (struct abt *, struct abt_node *); static struct abt_node *skew (struct abt *, struct abt_node *); @@ -120,7 +119,7 @@ abt_insert (struct abt *abt, struct abt_node *node) the tree, if AFTER is true, or the last node, if AFTER is false. */ static inline void -insert_relative (struct abt *abt, struct abt_node *p, bool after, +insert_relative (struct abt *abt, const struct abt_node *p, bool after, struct abt_node *node) { node->down[0] = NULL; @@ -147,8 +146,8 @@ insert_relative (struct abt *abt, struct abt_node *p, bool after, p = p->down[dir]; dir = !after; } - p->down[dir] = node; - node->up = p; + CONST_CAST (struct abt_node *, p)->down[dir] = node; + node->up = CONST_CAST (struct abt_node *, p); abt_reaugmented (abt, node); } @@ -169,7 +168,7 @@ abt_insert_after (struct abt *abt, const struct abt_node *p, struct abt_node *node) { assert (abt->compare == NULL); - insert_relative (abt, (struct abt_node *) p, true, node); + insert_relative (abt, p, true, node); } /* Inserts NODE before node P in ABT. @@ -182,7 +181,7 @@ abt_insert_before (struct abt *abt, const struct abt_node *p, struct abt_node *node) { assert (abt->compare == NULL); - insert_relative (abt, (struct abt_node *) p, false, node); + insert_relative (abt, p, false, node); } /* Deletes P from ABT. */ @@ -282,7 +281,7 @@ abt_find (const struct abt *abt, const struct abt_node *target) { cmp = abt->compare (target, p, abt->aux); if (cmp == 0) - return (struct abt_node *) p; + return CONST_CAST (struct abt_node *, p); } return NULL; @@ -309,7 +308,7 @@ abt_next (const struct abt *abt, const struct abt_node *p) p = p->down[1]; while (p->down[0] != NULL) p = p->down[0]; - return (struct abt_node *) p; + return CONST_CAST (struct abt_node *, p); } } @@ -334,7 +333,7 @@ abt_prev (const struct abt *abt, const struct abt_node *p) p = p->down[0]; while (p->down[1] != NULL) p = p->down[1]; - return (struct abt_node *) p; + return CONST_CAST (struct abt_node *, p); } } @@ -352,7 +351,7 @@ void abt_reaugmented (const struct abt *abt, struct abt_node *p) { for (; p != NULL; p = p->up) - abt->reaugment (p, p->down[0], p->down[1], abt->aux); + abt->reaugment (p, abt->aux); } /* Moves P around in ABT to compensate for its key having @@ -453,8 +452,8 @@ skew (struct abt *abt, struct abt_node *a) b->up = a->up; a->up = b; - abt->reaugment (a, a->down[0], a->down[1], abt->aux); - abt->reaugment (b, b->down[0], b->down[1], abt->aux); + abt->reaugment (a, abt->aux); + abt->reaugment (b, abt->aux); return b; } @@ -484,8 +483,8 @@ split (struct abt *abt, struct abt_node *a) b->level++; - abt->reaugment (a, a->down[0], a->down[1], abt->aux); - abt->reaugment (b, b->down[0], b->down[1], abt->aux); + abt->reaugment (a, abt->aux); + abt->reaugment (b, abt->aux); return b; }