---

typedobj.H

Go to the documentation of this file.

/*
 * Copyright 2000, Brown University, Providence, RI.
 * 
 *                         All Rights Reserved
 * 
 * Permission to use, copy, modify, and distribute this software and its
 * documentation for any purpose other than its incorporation into a
 * commercial product is hereby granted without fee, provided that the
 * above copyright notice appear in all copies and that both that
 * copyright notice and this permission notice appear in supporting
 * documentation, and that the name of Brown University not be used in
 * advertising or publicity pertaining to distribution of the software
 * without specific, written prior permission.
 * 
 * BROWN UNIVERSITY DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
 * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR ANY
 * PARTICULAR PURPOSE.  IN NO EVENT SHALL BROWN UNIVERSITY BE LIABLE FOR
 * ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */
#ifndef GLUE_TYPEDOBJ_H
#define GLUE_TYPEDOBJ_H

#include "std/dllimpexp.H"
#include "std/strings.H"

#define ISA(O)         (!!(O) && (O)->is_of_type(static_name()))
#define ISOF(N,PAR)    (N == static_name() || PAR::is_of_type(N))
#define IS(N)          (N == static_name())

#ifdef GLUE_AVOID_STATIC_LOCAL_INLINE_VAR
   #define STAT_STR_RET str_ptr
#else
   #define STAT_STR_RET Cstr_ptr &
#endif
#define DEFINE_BASE_TYPE(CLASS_NAME, CLASS_PTR)               \
   static  STAT_STR_RET static_name()         { RET_STAT_STR(#CLASS_NAME); } \
   virtual STAT_STR_RET class_name () const   { return static_name(); }   \
   virtual int  is_of_type(Cstr_ptr &n)const  { return n == static_name(); } \
   static  int  isa       (CLASS_PTR o)       { return ISA (o); }  \
   static  int  isa       (cTYPEDOBJ *o)      { return ISA (o); }

#define DEFINE_DERIVED_TYPE(CLASS_NAME, CLASS_PAR, CLASS_PTR)               \
   static  STAT_STR_RET  static_name()         { RET_STAT_STR(#CLASS_NAME);} \
   virtual STAT_STR_RET class_name () const   { return static_name(); }   \
   virtual int  is_of_type(Cstr_ptr &n)const  { return ISOF(n,CLASS_PAR);}\
   static  int  isa       (CLASS_PTR  o)      { return ISA (o); }  \
   static  int  isa       (cTYPEDOBJ *o)      { return ISA (o); }

typedef const class TYPEDOBJ cTYPEDOBJ;

class DllImpExp TYPEDOBJ {
   public:

     /* -------- prototype functions overloaded by subclasses -------- */
 virtual STAT_STR_RET class_name ()           const = 0;
 virtual int          is_of_type(Cstr_ptr &t) const = 0; // { return IS(t); }
};


// Hack to protect to warn against tags/tagset.H not being included
#ifndef DECLARE_TAGS_AND_DECODER
#ifdef sun
#define DECLARE_TAGS_AND_DECODER "You must include tags/tagset.H"
#else
#define DECLARE_TAGS_AND_DECODER(X) You_must_include_tagset_H_file_from_tags
#endif
#endif

#endif

---