annotate src/base-list.h @ 6909:fc55a5e1760b ss-2-9-14

[project @ 2007-09-17 20:47:40 by jwe]
author jwe
date Mon, 17 Sep 2007 20:47:41 +0000
parents 8d3426c59a88
children 93c65f2a5668
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
4222
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
1 /*
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
2
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
3 Copyright (C) 2002 John W. Eaton
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
4
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
5 This file is part of Octave.
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
6
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
7 Octave is free software; you can redistribute it and/or modify it
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
8 under the terms of the GNU General Public License as published by the
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
9 Free Software Foundation; either version 2, or (at your option) any
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
10 later version.
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
11
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
12 Octave is distributed in the hope that it will be useful, but WITHOUT
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
15 for more details.
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
16
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
18 along with Octave; see the file COPYING. If not, write to the Free
5307
4c8a2e4e0717 [project @ 2005-04-26 19:24:27 by jwe]
jwe
parents: 5142
diff changeset
19 Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
4c8a2e4e0717 [project @ 2005-04-26 19:24:27 by jwe]
jwe
parents: 5142
diff changeset
20 02110-1301, USA.
4222
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
21
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
22 */
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
23
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
24 #if !defined (octave_base_list_h)
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
25 #define octave_base_list_h 1
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
26
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
27 #include <list>
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
28
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
29 template <typename elt_type>
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
30 class
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
31 octave_base_list
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
32 {
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
33 public:
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
34
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
35 typedef typename std::list<elt_type>::iterator iterator;
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
36 typedef typename std::list<elt_type>::const_iterator const_iterator;
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
37
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
38 bool empty (void) const { return lst.empty (); }
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
39
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
40 size_t length (void) const { return lst.size (); }
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
41
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
42 iterator erase (iterator pos) { return lst.erase (pos); }
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
43
5142
0f9108f298ab [project @ 2005-02-12 02:29:34 by jwe]
jwe
parents: 4222
diff changeset
44 template <class P>
6841
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
45 void remove_if (P pred)
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
46 {
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
47 // We would like to simply call
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
48 //
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
49 // lst.remove_if (pred);
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
50 //
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
51 // but the Sun Studio compiler chokes on that.
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
52 //
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
53 // FIXME -- this kluge should be removed at some point.
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
54
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
55 iterator b = lst.begin ();
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
56 iterator e = lst.end ();
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
57 while (b != e)
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
58 {
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
59 iterator n = b;
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
60 n++;
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
61 if (pred (*b))
6842
8d3426c59a88 [project @ 2007-08-29 17:37:50 by jwe]
jwe
parents: 6841
diff changeset
62 lst.erase (b);
6841
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
63 b = n;
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
64 }
9cee629fe20c [project @ 2007-08-29 17:31:45 by jwe]
jwe
parents: 5307
diff changeset
65 }
5142
0f9108f298ab [project @ 2005-02-12 02:29:34 by jwe]
jwe
parents: 4222
diff changeset
66
4222
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
67 void clear (void) { lst.clear (); }
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
68
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
69 void append (const elt_type& s) { lst.push_back (s); }
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
70
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
71 iterator begin (void) { return iterator (lst.begin ()); }
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
72 const_iterator begin (void) const { return const_iterator (lst.begin ()); }
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
73
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
74 iterator end (void) { return iterator (lst.end ()); }
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
75 const_iterator end (void) const { return const_iterator (lst.end ()); }
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
76
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
77 elt_type& front (void) { return lst.front (); }
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
78 elt_type& back (void) { return lst.back (); }
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
79
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
80 const elt_type& front (void) const { return lst.front (); }
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
81 const elt_type& back (void) const { return lst.back (); }
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
82
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
83 private:
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
84
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
85 std::list<elt_type> lst;
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
86 };
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
87
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
88 #endif
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
89
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
90 /*
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
91 ;;; Local Variables: ***
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
92 ;;; mode: C++ ***
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
93 ;;; End: ***
1363b7e9bf3a [project @ 2002-12-13 14:13:42 by jwe]
jwe
parents:
diff changeset
94 */