--- rpl/src/rpl.c	2010/12/14 15:46:24	1.55
+++ rpl/src/rpl.c	2011/04/14 08:46:50	1.58.2.3
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.0.20
-  Copyright (C) 1989-2010 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.0.23
+  Copyright (C) 1989-2011 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -107,6 +107,10 @@ rplinit(int argc, char *argv[], unsigned
 
 	errno = 0;
 
+#	ifdef DMALLOC
+	atexit(dmalloc_shutdown());
+#	endif
+
 #	ifdef DEBUG_MEMOIRE
 	debug_memoire_initialisation();
 #	endif
@@ -307,11 +311,11 @@ rplinit(int argc, char *argv[], unsigned
 
 	if ((*s_etat_processus).langue == 'F')
 	{
-		printf("+++Copyright (C) 1989 à 2009, 2010 BERTRAND Joël\n");
+		printf("+++Copyright (C) 1989 à 2010, 2011 BERTRAND Joël\n");
 	}
 	else
 	{
-		printf("+++Copyright (C) 1989 to 2009, 2010 BERTRAND Joel\n");
+		printf("+++Copyright (C) 1989 to 2010, 2011 BERTRAND Joel\n");
 	}
 
 	if (getenv("HOME") != NULL)
@@ -1833,7 +1837,16 @@ rplinit(int argc, char *argv[], unsigned
 			(*s_etat_processus).affichage_arguments = 'N';
 			(*s_etat_processus).autorisation_conversion_chaine = 'Y';
 			(*s_etat_processus).autorisation_evaluation_nom = 'Y';
-			(*s_etat_processus).autorisation_nom_implicite = 'Y';
+
+			if (mode_interactif == d_vrai)
+			{
+				(*s_etat_processus).autorisation_nom_implicite = 'Y';
+			}
+			else
+			{
+				(*s_etat_processus).autorisation_nom_implicite = 'N';
+			}
+
 			(*s_etat_processus).autorisation_empilement_programme = 'N';
 			(*s_etat_processus).requete_arret = 'N';
 			(*s_etat_processus).evaluation_forcee = 'N';
@@ -3575,14 +3588,6 @@ rplinit(int argc, char *argv[], unsigned
 		}
 	}
 
-#	if !defined(Cygwin) && !defined(OpenBSD)
-	do
-	{
-		(*s_etat_processus).pile_signal.ss_flags = SS_DISABLE;
-	} while(sigaltstack(&((*s_etat_processus).pile_signal), NULL) != 0);
-	free((*s_etat_processus).pile_signal.ss_sp);
-#	endif
-
 	closelog();
 
 	pthread_mutex_destroy(&((*s_etat_processus).protection_liste_mutexes));