| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112 |
- /*************************************************************************/
- /* */
- /* Language Technologies Institute */
- /* Carnegie Mellon University */
- /* Copyright (c) 1999 */
- /* All Rights Reserved. */
- /* */
- /* Permission is hereby granted, free of charge, to use and distribute */
- /* this software and its documentation without restriction, including */
- /* without limitation the rights to use, copy, modify, merge, publish, */
- /* distribute, sublicense, and/or sell copies of this work, and to */
- /* permit persons to whom this work is furnished to do so, subject to */
- /* the following conditions: */
- /* 1. The code must retain the above copyright notice, this list of */
- /* conditions and the following disclaimer. */
- /* 2. Any modifications must be clearly marked as such. */
- /* 3. Original authors' names are not deleted. */
- /* 4. The authors' names are not used to endorse or promote products */
- /* derived from this software without specific prior written */
- /* permission. */
- /* */
- /* CARNEGIE MELLON UNIVERSITY AND THE CONTRIBUTORS TO THIS WORK */
- /* DISCLAIM ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING */
- /* ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT */
- /* SHALL CARNEGIE MELLON UNIVERSITY NOR THE CONTRIBUTORS 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. */
- /* */
- /*************************************************************************/
- /* Author: Alan W Black (awb@cs.cmu.edu) */
- /* Date: December 1999 */
- /*************************************************************************/
- /* */
- /* Macros for user defined type objects */
- /* */
- /*************************************************************************/
- #ifndef _CST_VAL_DEFS_H__
- #define _CST_VAL_DEFS_H__
- #include <stdlib.h>
- /* Macro for defining new user structs as vals */
- #define CST_VAL_USER_TYPE_DCLS(NAME,TYPE) \
- extern const int cst_val_type_##NAME; \
- TYPE *val_##NAME(const cst_val *v); \
- cst_val *NAME##_val(const TYPE *v);
- #define CST_VAL_USER_FUNCPTR_DCLS(NAME,TYPE) \
- extern const int cst_val_type_##NAME; \
- TYPE val_##NAME(const cst_val *v); \
- cst_val *NAME##_val(const TYPE v);
- #define CST_VAL_REGISTER_TYPE(NAME,TYPE) \
- TYPE *val_##NAME(const cst_val *v) \
- { \
- return (TYPE *)val_generic(v,cst_val_type_##NAME,#NAME); \
- } \
- void val_delete_##NAME(void *v) \
- { \
- delete_##NAME((TYPE *)v); \
- } \
- \
- cst_val *NAME##_val(const TYPE *v) \
- { \
- return val_new_typed(cst_val_type_##NAME, \
- (void *)v); \
- } \
- #define CST_VAL_REG_TD_TYPE(NAME,TYPE,NUM) \
- extern const int cst_val_type_##NAME; \
- const int cst_val_type_##NAME=NUM; \
- void val_delete_##NAME(void *v); \
- /* When objects of this type can never be owned by vals */
- #define CST_VAL_REGISTER_TYPE_NODEL(NAME,TYPE) \
- TYPE *val_##NAME(const cst_val *v) \
- { \
- return (TYPE *)val_generic(v,cst_val_type_##NAME,#NAME); \
- } \
- \
- cst_val *NAME##_val(const TYPE *v) \
- { \
- return val_new_typed(cst_val_type_##NAME, \
- (void *)v); \
- } \
- #define CST_VAL_REG_TD_TYPE_NODEL(NAME,TYPE,NUM) \
- extern const int cst_val_type_##NAME; \
- const int cst_val_type_##NAME=NUM; \
- void val_delete_##NAME(void *v) { (void)v; } \
- #define CST_VAL_REGISTER_FUNCPTR(NAME,TYPE) \
- TYPE val_##NAME(const cst_val *v) \
- { \
- return (TYPE)val_generic(v,cst_val_type_##NAME,#NAME); \
- } \
- \
- cst_val *NAME##_val(const TYPE v) \
- { \
- return val_new_typed(cst_val_type_##NAME, \
- (void *)v); \
- } \
- #define CST_VAL_REG_TD_FUNCPTR(NAME,TYPE,NUM) \
- extern const int cst_val_type_##NAME; \
- const int cst_val_type_##NAME=NUM; \
- void val_delete_##NAME(void *v) { (void)v; } \
- #endif
|