IdentityTableClass.hpp
Go to the documentation of this file.
1 /*----------------------------------------------------------------------------*/
2 /* */
3 /* Copyright (c) 1995, 2004 IBM Corporation. All rights reserved. */
4 /* Copyright (c) 2005-2009 Rexx Language Association. All rights reserved. */
5 /* */
6 /* This program and the accompanying materials are made available under */
7 /* the terms of the Common Public License v1.0 which accompanies this */
8 /* distribution. A copy is also available at the following address: */
9 /* http://www.oorexx.org/license.html */
10 /* */
11 /* Redistribution and use in source and binary forms, with or */
12 /* without modification, are permitted provided that the following */
13 /* conditions are met: */
14 /* */
15 /* Redistributions of source code must retain the above copyright */
16 /* notice, this list of conditions and the following disclaimer. */
17 /* Redistributions in binary form must reproduce the above copyright */
18 /* notice, this list of conditions and the following disclaimer in */
19 /* the documentation and/or other materials provided with the distribution. */
20 /* */
21 /* Neither the name of Rexx Language Association nor the names */
22 /* of its contributors may be used to endorse or promote products */
23 /* derived from this software without specific prior written permission. */
24 /* */
25 /* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS */
26 /* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT */
27 /* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS */
28 /* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT */
29 /* OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, */
30 /* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED */
31 /* TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, */
32 /* OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY */
33 /* OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING */
34 /* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS */
35 /* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */
36 /* */
37 /*----------------------------------------------------------------------------*/
38 /******************************************************************************/
39 /* REXX Kernel IdentityTableClass.hpp */
40 /* */
41 /* Primitive IdentityTable Collection Class Definition */
42 /* */
43 /******************************************************************************/
44 #ifndef Included_RexxIdentityTable
45 #define Included_RexxIdentityTable
46 
47 #include "TableClass.hpp"
48 
49 class RexxIdentityTable : public RexxTable {
50  public:
51  void * operator new(size_t size, void *objectPtr) { return objectPtr; };
52  /* So it doesn't need to do anythin*/
53  inline RexxIdentityTable(RESTORETYPE restoreType) { ; };
54 
55  virtual RexxObject *remove(RexxObject *key);
56  virtual RexxObject *get(RexxObject *key);
57  virtual RexxObject *put(RexxObject *, RexxObject *);
58  virtual RexxObject *add(RexxObject *, RexxObject *);
60  virtual RexxObject *hasItem(RexxObject *targetIndex);
61  virtual RexxObject *getIndex(RexxObject * value);
62 
63  inline RexxObject *hasItem(RexxObject *newValue, RexxObject *targetIndex) {return this->contents->primitiveHasItem(newValue, targetIndex); };
64  inline RexxArray *allAt(RexxObject *key) {return this->contents->primitiveGetAll(key);}
66 
67  RexxObject *newRexx(RexxObject **, size_t, size_t);
68  static void createInstance();
69  static RexxIdentityTable *newInstance(size_t size);
71 };
72 
73 
75 
76 #endif
77 
RexxIdentityTable * new_identity_table()
RESTORETYPE
Definition: ObjectClass.hpp:82
#define TheNilObject
Definition: RexxCore.h:191
RexxObject * value(HashLink pos)
RexxHashTable * contents
RexxArray * primitiveGetAll(RexxObject *key)
RexxObject * primitiveHasItem(RexxObject *, RexxObject *)
RexxObject * primitiveNextItem(RexxObject *, RexxObject *)
RexxArray * allAt(RexxObject *key)
RexxObject * findSuperScope(RexxObject *v)
virtual RexxObject * removeItem(RexxObject *value)
RexxObject * newRexx(RexxObject **, size_t, size_t)
static RexxClass * classInstance
virtual RexxObject * put(RexxObject *, RexxObject *)
virtual RexxObject * hasItem(RexxObject *targetIndex)
virtual RexxObject * get(RexxObject *key)
static void createInstance()
virtual RexxObject * getIndex(RexxObject *value)
virtual RexxObject * remove(RexxObject *key)
RexxIdentityTable(RESTORETYPE restoreType)
RexxObject * hasItem(RexxObject *newValue, RexxObject *targetIndex)
virtual RexxObject * add(RexxObject *, RexxObject *)
static RexxTable * newInstance()
Definition: TableClass.cpp:215