--- rpl/src/rpl.c	2011/09/21 09:09:01	1.94
+++ rpl/src/rpl.c	2011/11/26 13:05:03	1.99
@@ -1,6 +1,6 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.3
+  RPL/2 (R) version 4.1.5
   Copyright (C) 1989-2011 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
@@ -36,7 +36,9 @@ rplinit(int argc, char *argv[], unsigned
 #	include								"copyright-conv.h"
 #	include								"licence-conv.h"
 
+#	ifdef HAVE_STACK_OVERFLOW_RECOVERY
 	char								pile_signaux[SIGSTKSZ];
+#	endif
 
 	file								*f_source;
 
@@ -2755,16 +2757,6 @@ rplinit(int argc, char *argv[], unsigned
 					l_element_courant = (*s_etat_processus).liste_mutexes;
 					while(l_element_courant != NULL)
 					{
-						pthread_mutex_trylock(&((*((struct_mutex *)
-								(*(*((struct_liste_chainee *)
-								l_element_courant)).donnee).objet)).mutex));
-						pthread_mutex_unlock(&((*((struct_mutex *)
-								(*(*((struct_liste_chainee *)
-								l_element_courant)).donnee).objet)).mutex));
-						pthread_mutex_destroy(&((*((struct_mutex *)
-								(*(*((struct_liste_chainee *)
-								l_element_courant)).donnee).objet)).mutex));
-
 						liberation(s_etat_processus,
 								(*((struct_liste_chainee *)
 								l_element_courant)).donnee);
@@ -3647,4 +3639,21 @@ informations(struct_processus *s_etat_pr
 	return;
 }
 
+
+unsigned char *
+date_compilation()
+{
+	unsigned char		*date;
+
+	if ((date = malloc((strlen(d_date_en_rpl) + 1) * sizeof(unsigned char)))
+			== NULL)
+	{
+		return(NULL);
+	}
+
+	strcpy(date, d_date_en_rpl);
+
+	return(date);
+}
+
 // vim: ts=4