--- rpl/src/formateur_flux.c	2013/03/20 17:11:43	1.34
+++ rpl/src/formateur_flux.c	2024/01/09 07:33:48	1.64
@@ -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.35
+  Copyright (C) 1989-2024 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -257,8 +257,7 @@ formateur_flux(struct_processus *s_etat_
 	(*ptr_ecriture) = d_code_fin_chaine;
 
 	if ((chaine = realloc(chaine, (((size_t) ((*longueur) =
-			ptr_ecriture - chaine)) + 1)
-			* sizeof(unsigned char))) == NULL)
+			ptr_ecriture - chaine)) + 1) * sizeof(unsigned char))) == NULL)
 	{
 		(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 		return(NULL);
@@ -284,7 +283,8 @@ unsigned char *
 analyse_flux(struct_processus *s_etat_processus, unsigned char *donnees,
 		integer8 longueur)
 {
-	long					longueur_courante;
+	integer8				longueur_courante;
+
 	long					offset;
 
 	unsigned char			*chaine;