rpl/src/rplexternals.h - diff

Return to rplexternals.h CVS log

Up to [local] / rpl / src

version 1.67, 2015/10/26 15:14:43	version 1.71, 2016/09/27 15:29:40
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.1.23	RPL/2 (R) version 4.1.26
Copyright (C) 1989-2015 Dr. BERTRAND Joël	Copyright (C) 1989-2016 Dr. BERTRAND Joël

This file is part of RPL/2.	This file is part of RPL/2.

Line 1203	Line 1203
if ((ptr = malloc(a)) == NULL) \	if ((ptr = malloc(a)) == NULL) \
systemError("Memory allocation error"); ptr; })	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 { \	#define deallocate(a) do { \
struct_processus *s_etat_processus; \	struct_processus *s_etat_processus; \
s_etat_processus = (*rpl_arguments).s_etat_processus; \	s_etat_processus = (*rpl_arguments).s_etat_processus; \