--- rpl/src/rpl.c	2018/05/30 09:27:39	1.202
+++ rpl/src/rpl.c	2019/02/07 21:44:15	1.207
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.29
-  Copyright (C) 1989-2018 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.31
+  Copyright (C) 1989-2019 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -315,6 +315,9 @@ rplinit(int argc, char *argv[], char *en
 
 #	ifndef SEMAPHORES_NOMMES
 		sem_init(&((*s_etat_processus).semaphore_fork), 0, 0);
+uprintf("[%d-%llu] Semaphore fork %p (rpl.c)\n", (int) getpid(),
+		(unsigned long long) pthread_self(),
+		&((*s_etat_processus).semaphore_fork));
 #	else
 		if (((*s_etat_processus).semaphore_fork = sem_init3(0, getpid(),
 				pthread_self(), SEM_FORK)) == SEM_FAILED)
@@ -449,11 +452,11 @@ rplinit(int argc, char *argv[], char *en
 
 		if ((*s_etat_processus).langue == 'F')
 		{
-			printf("+++Copyright (C) 1989 à 2017, 2018 BERTRAND Joël\n");
+			printf("+++Copyright (C) 1989 à 2018, 2019 BERTRAND Joël\n");
 		}
 		else
 		{
-			printf("+++Copyright (C) 1989 to 2017, 2018 BERTRAND Joel\n");
+			printf("+++Copyright (C) 1989 to 2018, 2019 BERTRAND Joel\n");
 		}
 	}