Merge branch 'cde-fixups-1' of ssh://git.code.sf.net/p/cdesktopenv/code into cde...
[oweals/cde.git] / cde / programs / nsgmls / IListBase.C
1 /*
2  * CDE - Common Desktop Environment
3  *
4  * Copyright (c) 1993-2012, The Open Group. All rights reserved.
5  *
6  * These libraries and programs are free software; you can
7  * redistribute them and/or modify them under the terms of the GNU
8  * Lesser General Public License as published by the Free Software
9  * Foundation; either version 2 of the License, or (at your option)
10  * any later version.
11  *
12  * These libraries and programs are distributed in the hope that
13  * they will be useful, but WITHOUT ANY WARRANTY; without even the
14  * implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
15  * PURPOSE. See the GNU Lesser General Public License for more
16  * details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with these libraries and programs; if not, write
20  * to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
21  * Floor, Boston, MA 02110-1301 USA
22  */
23 /* $XConsortium: IListBase.C /main/1 1996/07/29 16:53:20 cde-hp $ */
24 // Copyright (c) 1994 James Clark
25 // See the file COPYING for copying permission.
26
27 #include "splib.h"
28 #include "IListBase.h"
29
30 #ifdef SP_NAMESPACE
31 namespace SP_NAMESPACE {
32 #endif
33
34 void IListBase::append(Link *p)
35 {
36   Link **pp;
37   for (pp = &head_; *pp; pp = &(*pp)->next_)
38     ;
39   *pp = p;
40 }
41
42 void IListBase::remove(Link *p)
43 {
44   for (Link **pp = &head_; *pp; pp = &(*pp)->next_)
45     if (*pp == p) {
46       *pp = p->next_;
47       break;
48     }
49 }
50
51 void IListBase::clear()
52 {
53   while (!empty())
54     delete get();
55 }
56
57 #ifdef SP_NAMESPACE
58 }
59 #endif