--- rpl/src/rpl.h	2013/02/26 10:25:22	1.196
+++ rpl/src/rpl.h	2013/03/05 16:26:46	1.203
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.12
-  Copyright (C) 1989-2012 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.13
+  Copyright (C) 1989-2013 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -19,7 +19,7 @@
 ================================================================================
 */
 
-
+#define DEBUG_ERREURS
 #ifndef INCLUSION_RPL
 #define INCLUSION_RPL
 
@@ -966,6 +966,7 @@ pid_t debug_fork();
 #	define d_ex_chiffrement						__erreur(89)
 #	define d_ex_chiffrement_indisponible		__erreur(90)
 #	define d_ex_longueur_clef_chiffrement		__erreur(91)
+#	define d_ex_taille_message					__erreur(92)
 #endif
 
 
@@ -1488,8 +1489,6 @@ typedef struct liste_pile_systeme
 {
 	struct liste_pile_systeme	*suivant;
 
-	struct_liste_chainee		*pointeur_objet_retour;
-
 	struct_objet				*indice_boucle;
 	struct_objet				*limite_indice_boucle;
 	struct_objet				*objet_de_test;
@@ -1545,7 +1544,7 @@ typedef struct liste_pile_systeme
 
 	unsigned long				adresse_retour;
 	unsigned long				niveau_courant;
-	struct_objet				*pointeur_adresse_retour;
+	struct_liste_chainee		*pointeur_objet_retour;
 } struct_liste_pile_systeme;
 #endif
 
@@ -3222,8 +3221,6 @@ unsigned char *chiffrement(const EVP_CIP
 		logical1 encodage, unsigned char *message, unsigned int
 		longueur_message, unsigned char *clef, unsigned int longueur_clef,
 		unsigned char *vecteur_initialisation,
-		unsigned int longueur_vecteur_initialisation,
-		unsigned int longueur_bloc_chiffrement,
 		unsigned int *longueur_message_chiffre);
 unsigned char *compactage(unsigned char *chaine);
 unsigned char *conversion_majuscule(unsigned char *chaine);