PointerClass.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.ibm.com/developerworks/oss/CPLv1.0.htm */
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 RexxPointer.hpp */
40 /* */
41 /* Primitive Pointer Class Definitions */
42 /* */
43 /******************************************************************************/
44 #ifndef Included_RexxPointer
45 #define Included_RexxPointer
46 
47 #include "ObjectClass.hpp"
48 
49 class RexxPointer : public RexxObject
50 {
51 public:
52  inline void *operator new(size_t, void *ptr) { return ptr; }
53  inline void operator delete(void *, void *) { ; }
54  void *operator new(size_t);
55  inline void operator delete(void *) { ; }
56 
57  inline RexxPointer() { pointerData = NULL; };
58  inline RexxPointer(void *ptr) { pointerData = ptr; };
59  inline RexxPointer(RESTORETYPE restoreType) { ; };
60  inline void *pointer() { return pointerData; }
61 
64 
65  RexxObject *isNull();
66  virtual HashCode getHashValue();
67  virtual RexxString *stringValue();
68 
69  RexxObject *newRexx(RexxObject **args, size_t argc, size_t named_argc);
70 
71  static void createInstance();
72 
73  static RexxClass *classInstance; // singleton class instance
74  static RexxPointer *nullPointer; // single version of a null pointer
75 
76 protected:
77  void *pointerData; /* actual pointer value */
78 };
79 
80 
81 inline RexxPointer *new_pointer(void *p)
82 {
83 
84  return new RexxPointer(p);
85 }
86 #endif
RESTORETYPE
Definition: ObjectClass.hpp:82
size_t HashCode
Definition: ObjectClass.hpp:79
RexxPointer * new_pointer(void *p)
RexxPointer(void *ptr)
static RexxPointer * nullPointer
void * pointerData
RexxObject * notEqual(RexxObject *other)
RexxPointer(RESTORETYPE restoreType)
static RexxClass * classInstance
void * pointer()
static void createInstance()
virtual RexxString * stringValue()
virtual HashCode getHashValue()
RexxObject * newRexx(RexxObject **args, size_t argc, size_t named_argc)
RexxObject * equal(RexxObject *)
RexxObject * isNull()