--- rpl/src/rplexternals.h 2015/11/26 11:44:43 1.68 +++ rpl/src/rplexternals.h 2016/09/27 15:29:40 1.71 @@ -1,7 +1,7 @@ /* ================================================================================ - RPL/2 (R) version 4.1.24 - Copyright (C) 1989-2015 Dr. BERTRAND Joël + RPL/2 (R) version 4.1.26 + Copyright (C) 1989-2016 Dr. BERTRAND Joël This file is part of RPL/2. @@ -1203,6 +1203,12 @@ if ((ptr = malloc(a)) == NULL) \ systemError("Memory allocation error"); ptr; }) +#define reallocate(a, s) ({ void *ptr; \ + struct_processus *s_etat_processus; \ + s_etat_processus = (*rpl_arguments).s_etat_processus; \ + if ((ptr = realloc(a, s)) == NULL) \ + systemError("Memory allocation error"); ptr; }) + #define deallocate(a) do { \ struct_processus *s_etat_processus; \ s_etat_processus = (*rpl_arguments).s_etat_processus; \