rpl/src/fusible.c - diff

Return to fusible.c CVS log

Up to [local] / rpl / src

version 1.11, 2010/07/14 14:19:34	version 1.30, 2011/07/25 07:44:54
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.0.18	RPL/2 (R) version 4.1.2
Copyright (C) 1989-2010 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 20	Line 20
*/	*/


#include "rpl.conv.h"	#include "rpl-conv.h"


/*	/*
Line 40	Line 40
void *	void *
fusible(void *argument)	fusible(void *argument)
{	{
	# ifndef OS2

real8 temps_cpu_precedent;	real8 temps_cpu_precedent;
real8 temps_cpu_courant;	real8 temps_cpu_courant;

Line 95 fusible(void *argument)	Line 97 fusible(void *argument)
{	{
pthread_testcancel();	pthread_testcancel();
nanosleep(&temporisation, NULL);	nanosleep(&temporisation, NULL);

getrusage(RUSAGE_SELF, &s_rusage);	getrusage(RUSAGE_SELF, &s_rusage);

temps_cpu_precedent = temps_cpu_courant;	temps_cpu_precedent = temps_cpu_courant;
Line 132 fusible(void *argument)	Line 133 fusible(void *argument)
fflush(stdout);	fflush(stdout);
}	}

	# else

	struct_processus *s_etat_processus;

	s_etat_processus = argument;

	if ((*s_etat_processus).langue == 'F')
	{
	printf("+++Attention : Support indisponible sous OS/2\n");
	}
	else
	{
	printf("+++Warning : Function unavailable\n");
	}
	# endif

pthread_exit(NULL);	pthread_exit(NULL);
}	}