--- rpl/src/calcul_integral.c	2013/03/20 17:11:43	1.43
+++ rpl/src/calcul_integral.c	2022/09/07 13:40:30	1.71
@@ -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.34
+  Copyright (C) 1989-2021 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -64,6 +64,8 @@ integrale_romberg(struct_processus *s_et
 	integer8					nombre_termes;
 	integer8					taille_vecteur_precedent;
 
+	erreur = 0;
+
 	/*
 	 * Création d'une variable locale représentant la variable d'intégration
 	 */
@@ -197,7 +199,6 @@ integrale_romberg(struct_processus *s_et
 			return;
 		}
 
-
 		if (vecteur_precedent == NULL)
 		{
 			/*
@@ -350,7 +351,7 @@ evaluation_romberg(struct_processus *s_e
 		struct_objet *s_expression, unsigned char *variable, real8 *point,
 		real8 *valeur, logical1 *validite)
 {
-	long								hauteur_pile;
+	integer8							hauteur_pile;
 
 	struct_liste_pile_systeme			*l_position_normale;