--- rpl/src/gestion_pile_systeme.c	2013/03/23 17:57:39	1.58
+++ rpl/src/gestion_pile_systeme.c	2015/09/18 13:41:10	1.73
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.13
-  Copyright (C) 1989-2013 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.23
+  Copyright (C) 1989-2015 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -492,8 +492,8 @@ trace(struct_processus *s_etat_processus
 			}
 		}
 
-		fprintf(flux, "    Level             = %d\n",
-				(*l_element_courant).niveau_courant);
+		fprintf(flux, "    Level             = %lld\n",
+				(long long int) (*l_element_courant).niveau_courant);
 
 		if ((*l_element_courant).retour_definition == 'Y')
 		{
@@ -617,12 +617,16 @@ trace(struct_processus *s_etat_processus
 								"unknown definition\n");
 					}
 				}
-				else
+				else if ((*l_element_courant).niveau_courant == 0)
 				{
 					fprintf(flux, "\n");
 					fprintf(flux, "                      = RPL/2 "
 							"initialization\n");
 				}
+				else
+				{
+					fprintf(flux, "\n");
+				}
 			}
 		}
 		else