--- rpl/src/rplexternals.h 2023/11/27 12:51:19 1.102 +++ rpl/src/rplexternals.h 2025/04/15 10:17:57 1.106 @@ -1,7 +1,7 @@ /* ================================================================================ - RPL/2 (R) version 4.1.35 - Copyright (C) 1989-2023 Dr. BERTRAND Joël + RPL/2 (R) version 4.1.36 + Copyright (C) 1989-2025 Dr. BERTRAND Joël This file is part of RPL/2. @@ -885,7 +885,7 @@ } } while(0) #define vectorSize(rpl_object) \ - ({ integer8 __size; if (((*rpl_object).type == VIN) || \ + ({ integer8 __size = 0; if (((*rpl_object).type == VIN) || \ ((*rpl_object).type == VRL) || \ ((*rpl_object).type == VCX)) \ __size = (*((struct_vecteur *) (*rpl_object).objet)).taille; \