- Timestamp:
- Sep 25, 2000, 5:18:26 PM (24 years ago)
- Branches:
- (u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')
- Children:
- ff4e34fa88e2957ee964d2e38c9e058cf143c963
- Parents:
- 1be9b035074ff3a5a5a889ae801c65a517bf18d2
- Location:
- MP/MPT
- Files:
-
- 5 edited
Legend:
- Unmodified
- Added
- Removed
-
MP/MPT/MPT.h
r1be9b03 r122d49 103 103 /* For the following, we assume that sizeof(void *) >= sizeof(type) */ 104 104 #define MP_BOOLEAN_T(arg) ((MP_Boolean_t) (MP_UINT32_T(arg))) 105 #define MP_ARG_BOOLEAN_T(arg) ((MPT_Arg_t)((MP_Boolean_t) (MP_UINT32_T(arg)))) 105 106 #define MP_COMMON_T(arg) ((MP_Common_t) (MP_UINT32_T(arg))) 107 #define MP_ARG_COMMON_T(arg) ((MPT_Arg_t)((MP_Common_t) (MP_UINT32_T(arg)))) 106 108 #define MP_SINT8_T(arg) ((MP_Sint8_t) (MP_SINT32_T(arg))) 109 #define MP_ARG_SINT8_T(arg) ((MPT_Arg_t)((MP_Sint8_t) (MP_SINT32_T(arg)))) 107 110 #define MP_UINT8_T(arg) ((MP_Uint8_t) (MP_UINT32_T(arg))) 111 #define MP_ARG_UINT8_T(arg) ((MPT_Arg_t)((MP_Uint8_t) (MP_UINT32_T(arg)))) 108 112 #define MP_SINT32_T(arg) ((MP_Sint32_t) (arg)) 113 #define MP_ARG_SINT32_T(arg) ((MPT_Arg_t)((MP_Sint32_t) (arg))) 109 114 #define MP_UINT32_T(arg) ((MP_Uint32_t) (arg)) 115 #define MP_ARG_UINT32_T(arg) ((MPT_Arg_t)((MP_Uint32_t) (arg))) 110 116 #define MP_REAL32_T(arg) ((MP_Real32_t) (arg)) 117 #define MP_ARG_REAL32_T(arg) ((MPT_Arg_t)((MP_Real32_t) (arg))) 111 118 #ifndef __64_BIT__ 112 119 /* sizeof(void *) < sizeof(MP_Real64_t) */ … … 116 123 #define MP_REAL64_T(arg) ((MP_Real64_t) (arg)) 117 124 #endif 125 #define MP_ARG_REAL64_T(arg) ((MPT_Arg_t)MP_REAL64_T(arg)) 118 126 #define MP_APINT_T(arg) ((MP_ApInt_t) (arg)) 127 #define MP_ARG_APINT_T(arg) ((MPT_Arg_t)((MP_ApInt_t) (arg))) 119 128 #define MP_APREAL_T(arg) ((MP_ApReal_t) (arg)) 129 #define MP_ARG_APREAL_T(arg) ((MPT_Arg_t)((MP_ApReal_t) (arg))) 120 130 #define MP_STRING_T(arg) ((char *) (arg)) 131 #define MP_ARG_STRING_T(arg) ((MPT_Arg_t)((char *) (arg))) 121 132 #define MPT_ARG_T(arg) ((MPT_Arg_t) (arg)) 122 133 … … 130 141 /* For user defined Meta types or unspecified types */ 131 142 #define MPT_TREE_PT(arg) ((MPT_Tree_pt) arg) 132 133 143 134 144 /* And here are Macros tofor dealing with MPT_Arg_pt's */ … … 538 548 do \ 539 549 { \ 540 if (( cond) != MP_Success) return MPT_SetError(MPT_MP_Failure); \550 if (((MP_Status_t) (cond)) != MP_Success) return MPT_SetError(MPT_MP_Failure); \ 541 551 } while (0) 542 552 -
MP/MPT/MPT_Get.cc
r1be9b03 r122d49 128 128 &(node->numchild))); 129 129 130 MP_COMMON_T(node->nvalue) = cvalue;130 node->nvalue = MP_ARG_COMMON_T(cvalue); 131 131 /* Get the node value, if necessary */ 132 132 type = node->type; -
MP/MPT/MPT_GetPoly.cc
r1be9b03 r122d49 133 133 vtree->node->numannot = 0; 134 134 vtree->node->annots = NULL; 135 MP_COMMON_T(vtree->node->nvalue) = MP_CopBasicList;135 vtree->node->nvalue = MP_ARG_COMMON_T(MP_CopBasicList); 136 136 if (temp_tree != NULL) 137 137 { … … 175 175 nnode->nvalue = (MPT_Arg_t) IMP_RawMemAllocFnc(12*sizeof(char)); 176 176 sprintf((char *) nnode->nvalue, "x%ld", i); 177 MPT_TREE_PT(nargs[i]) = ntree;177 nargs[i] = MPT_ARG_T(ntree); 178 178 } 179 179 -
MP/MPT/MPT_PolyManips.cc
r1be9b03 r122d49 208 208 non_zero + 1); 209 209 margs = mtree->args; 210 MPT_TREE_PT(margs[0]) = ctree;210 margs[0] = MPT_ARG_T(ctree); 211 211 212 212 for (j=0, k=1; k<=non_zero; j++) -
MP/MPT/MPT_TreeManips.cc
r1be9b03 r122d49 220 220 { 221 221 MP_Uint32_t *uint32_array = MP_UINT32_PT(args); 222 MP_UINT32_T(new_tree->node->nvalue) = uint32_array[0];223 MPT_TREE_PT(args[0]) = new_tree;222 new_tree->node->nvalue = MP_ARG_UINT32_T(uint32_array[0]); 223 args[0] = MPT_ARG_T(new_tree); 224 224 for (i=1; i<nc; i++) 225 225 { 226 226 MPT_CpyTree(&n_tree, new_tree); 227 MP_UINT32_T(n_tree->node->nvalue) = uint32_array[i];228 MPT_TREE_PT(args[i]) = n_tree;227 n_tree->node->nvalue = MP_ARG_UINT32_T(uint32_array[i]); 228 args[i] = MPT_ARG_T(n_tree); 229 229 } 230 230 return args; … … 235 235 MPT_Arg_pt new_args 236 236 = (MPT_Arg_pt) IMP_MemAllocFnc(nc*sizeof(MPT_Arg_t)); 237 MP_UINT8_T(new_tree->node->nvalue) = uint8_array[0];238 MPT_TREE_PT(new_args[0]) = new_tree;237 new_tree->node->nvalue = MP_ARG_UINT8_T(uint8_array[0]); 238 new_args[0] = MPT_ARG_T(new_tree); 239 239 for (i=1; i<nc; i++) 240 240 { 241 241 MPT_CpyTree(&n_tree, new_tree); 242 MP_UINT8_T(n_tree->node->nvalue) = uint8_array[i];243 MPT_TREE_PT(new_args[i]) = n_tree;242 n_tree->node->nvalue = MP_ARG_UINT8_T(uint8_array[i]); 243 new_args[i] = MPT_ARG_T(n_tree); 244 244 } 245 245 IMP_MemFreeFnc(args, nc*sizeof(MP_Uint8_t)); … … 256 256 #endif 257 257 MP_REAL64_T(new_tree->node->nvalue) = real64_array[i]; 258 MPT_TREE_PT(new_args[0]) = new_tree;258 new_args[0] = MPT_ARG_T(new_tree); 259 259 for (i=1; i<nc; i++) 260 260 { 261 261 MPT_CpyTree(&n_tree, new_tree); 262 262 MP_REAL64_T(n_tree->node->nvalue) = real64_array[i]; 263 MPT_TREE_PT(args[i]) = n_tree;263 args[i] = MPT_ARG_T(n_tree); 264 264 } 265 265 IMP_MemFreeFnc(args, nc*sizeof(MP_Real64_t)); … … 270 270 /* else we go step by step */ 271 271 for (i=0; i<nc; i++) 272 MPT_TREE_PT(args[i]) = MPT_UntypespecArg(args[i], typespec);272 args[i] = MPT_ARG_T(MPT_UntypespecArg(args[i], typespec)); 273 273 274 274 return args;
Note: See TracChangeset
for help on using the changeset viewer.