|
version 1.101, 2023/11/27 08:48:46
|
version 1.102, 2023/11/27 12:51:19
|
|
Line 885
|
Line 885
|
| } } while(0) |
} } while(0) |
| |
|
| #define vectorSize(rpl_object) \ |
#define vectorSize(rpl_object) \ |
| ({ if ((*rpl_object).type == VIN) \ |
({ integer8 __size; if (((*rpl_object).type == VIN) || \ |
| (*((integer8 *) (*rpl_object).objet)).taille; \ |
((*rpl_object).type == VRL) || \ |
| else if ((*rpl_object).type == VRL) \ |
((*rpl_object).type == VCX)) \ |
| (*((real8 *) (*rpl_object).objet)).taille; \ |
__size = (*((struct_vecteur *) (*rpl_object).objet)).taille; \ |
| else if ((*rpl_object).type == VCX)) \ |
else executionError("Type mistmatch error"); __size; }) |
| (*((complex16 *) (*rpl_object).objet)).taille; \ |
|
| else { executionError("Type mistmatch error"); 0; } }) |
|
| |
|
| // Integer vector |
// Integer vector |
| |
|
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to rplexternals.h CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [local] / rpl / src