rpl/src/gestion_objets.c - diff

Return to gestion_objets.c CVS log

Up to [local] / rpl / src

Diff for /rpl/src/gestion_objets.c between versions 1.140 and 1.145

version 1.140, 2018/12/21 13:36:38	version 1.145, 2019/02/03 14:40:33
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.1.29	RPL/2 (R) version 4.1.31
Copyright (C) 1989-2018 Dr. BERTRAND Joël	Copyright (C) 1989-2019 Dr. BERTRAND Joël

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

Line 635 allocation(struct_processus *s_etat_proc	Line 635 allocation(struct_processus *s_etat_proc
}	}
else	else
{	{
if (((s_objet).objet = malloc(2 sizeof(struct_objet *)))	if (((*s_objet).objet = malloc(sizeof(struct_record)))
== NULL)	== NULL)
{	{
(*s_etat_processus).erreur_systeme =	(*s_etat_processus).erreur_systeme =
Line 3074 copie_etat_processus(struct_processus *s	Line 3074 copie_etat_processus(struct_processus *s
return(NULL);	return(NULL);
}	}


	if (pthread_mutex_lock(&((*s_etat_processus).mutex_interruptions)) != 0)
	{
	(*s_etat_processus).erreur_systeme = d_es_processus;
	return(NULL);
	}

	if (pthread_mutex_lock(&((*s_etat_processus).mutex_signaux)) != 0)
	{
	(*s_etat_processus).erreur_systeme = d_es_processus;
	return(NULL);
	}

(s_nouvel_etat_processus) = (s_etat_processus);	(s_nouvel_etat_processus) = (s_etat_processus);

	if (pthread_mutex_unlock(&((*s_etat_processus).mutex_signaux)) != 0)
	{
	(*s_etat_processus).erreur_systeme = d_es_processus;
	return(NULL);
	}

	if (pthread_mutex_unlock(&((*s_etat_processus).mutex_interruptions)) != 0)
	{
	(*s_etat_processus).erreur_systeme = d_es_processus;
	return(NULL);
	}

// On réinitialise les allocateurs.	// On réinitialise les allocateurs.

pthread_mutexattr_init(&attributs_mutex);	pthread_mutexattr_init(&attributs_mutex);

CVSweb interface <joel.bertrand@systella.fr>

Removed from v.1.140
changed lines
	Added in v.1.145