--- rpl/src/fusible.c	2010/08/09 13:51:47	1.14
+++ rpl/src/fusible.c	2011/06/27 09:04:55	1.28
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.0.18
-  Copyright (C) 1989-2010 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.0
+  Copyright (C) 1989-2011 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -134,14 +134,19 @@ fusible(void *argument)
 	}
 
 #	else
-		if ((*s_etat_processus).langue == 'F')
-		{
-			printf("+++Attention : Support indisponible sous OS/2\n");
-		}
-		else
-		{
-			printf("+++Attention : Function unavailable\n");
-		}
+
+	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);