--- rpl/src/rplexternals.h	2023/11/27 08:48:46	1.101
+++ rpl/src/rplexternals.h	2023/11/27 12:51:19	1.102
@@ -885,13 +885,11 @@
 	} } while(0)
 
 #define vectorSize(rpl_object) \
-	({ if ((*rpl_object).type == VIN) \
-			(*((integer8 *) (*rpl_object).objet)).taille; \
-	else if ((*rpl_object).type == VRL) \
-			(*((real8 *) (*rpl_object).objet)).taille; \
-	else if ((*rpl_object).type == VCX)) \
-			(*((complex16 *) (*rpl_object).objet)).taille; \
-	else { executionError("Type mistmatch error"); 0; } })
+	({ integer8 __size; if (((*rpl_object).type == VIN) || \
+		   	((*rpl_object).type == VRL) || \
+			((*rpl_object).type == VCX)) \
+		__size = (*((struct_vecteur *) (*rpl_object).objet)).taille; \
+	else executionError("Type mistmatch error"); __size; })
 
 // Integer vector