rpl/src/interface_cas.cpp - diff

Return to interface_cas.cpp CVS log

Up to [local] / rpl / src

Diff for /rpl/src/interface_cas.cpp between versions 1.14 and 1.19

version 1.14, 2011/08/09 10:30:37	version 1.19, 2011/11/18 09:51:33
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.1.2	RPL/2 (R) version 4.1.4
Copyright (C) 1989-2011 Dr. BERTRAND Joël	Copyright (C) 1989-2011 Dr. BERTRAND Joël

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


#ifdef RPLCAS	#ifdef RPLCAS

	// Giac inclut <semaphore.h> et définit sem_t. Or l'émulation
	// des IPCS POSIX requiert une redéfinition de sem_t.

	# ifdef IPCS_SYSV
	// NetBSD : _SEMAPHORE_H_
	# define _SEMAPHORE_H_
	# endif

# include "giac.h"	# include "giac.h"

# undef PACKAGE	# undef PACKAGE
Line 55 initialisation_contexte_cas(struct_proce	Line 64 initialisation_contexte_cas(struct_proce
void	void
liberation_contexte_cas(struct_processus *s_etat_processus)	liberation_contexte_cas(struct_processus *s_etat_processus)
{	{
delete reinterpret_cast<giac::context *>(s_etat_processus->contexte_cas);	if (s_etat_processus->contexte_cas != NULL)
s_etat_processus->contexte_cas = NULL;	{
	# ifdef RPLCAS
	delete reinterpret_cast<giac::context *>(
	s_etat_processus->contexte_cas);
	# endif
	s_etat_processus->contexte_cas = NULL;
	}

return;	return;
}	}

	#ifdef RPLCAS
static unsigned char *	static unsigned char *
conversion_rpl_vers_cas(struct_processus *s_etat_processus,	conversion_rpl_vers_cas(struct_processus *s_etat_processus,
struct_objet **s_objet)	struct_objet **s_objet)
Line 385 conversion_cas_vers_rpl(struct_processus	Line 401 conversion_cas_vers_rpl(struct_processus

return;	return;
}	}
	#endif


/*	/*

CVSweb interface <joel.bertrand@systella.fr>

Removed from v.1.14
changed lines
	Added in v.1.19