--- rpl/src/rpl.h	2011/10/21 11:38:38	1.137
+++ rpl/src/rpl.h	2011/11/18 09:51:33	1.140
@@ -935,6 +935,7 @@ pid_t debug_fork();
 #	define d_ex_version_bibliotheque			__erreur(82)
 #	define d_ex_creation_variable_globale		__erreur(83)
 #	define d_ex_erreur_interne_rplcas			__erreur(84)
+#	define d_ex_fichier_corrompu				__erreur(85)
 #endif
 
 
@@ -3082,6 +3083,9 @@ unsigned char *formateur_flux(struct_pro
 unsigned char *formateur_fichier_nombre(struct_processus *s_etat_processus,
 		void *valeur_numerique, unsigned char type,
 		long longueur, long longueur_champ, unsigned char format);
+unsigned char *formateur_fichier_binaire_nombre(struct_processus
+		*s_etat_processus, void *valeur_numerique, unsigned char type,
+		long longueur, long *longueur_conversion);
 unsigned char *formateur_fichier_reel(struct_processus *s_etat_processus,
 		void *valeur_numerique, unsigned char type,
 		long longueur, long longueur_champ, unsigned char format);
@@ -3090,6 +3094,8 @@ unsigned char *formateur_nombre(struct_p
 unsigned char *formateur_reel(struct_processus *s_etat_processus,
 		void *valeur_numerique, unsigned char type);
 unsigned char *messages(struct_processus *s_etat_processus);
+unsigned char *pointeur_ieme_caractere(struct_processus *s_etat_processus,
+		unsigned char *chaine, integer8 position);
 unsigned char *purification_chaine(unsigned char *chaine);
 unsigned char *reencodage(struct_processus *s_etat_processus,
 		unsigned char *chaine_entree, unsigned char *codage_entree,
@@ -3175,6 +3181,7 @@ logical1 test_cfsf(struct_processus *s_e
 		unsigned char indice_drapeau);
 logical1 test_expression_rpn(unsigned char *chaine);
 logical1 test_fonction(unsigned char *chaine);
+logical1 validation_chaine(unsigned char *chaine);
 #endif
 
 /*
@@ -3221,7 +3228,6 @@ int wrapper_instruction_intrinseque(void
 
 #ifndef RPLARGS
 unsigned char longueur_entiers_binaires(struct_processus *s_etat_processus);
-unsigned char recherche_longueur_optimale(integer8 parametre);
 #endif
 
 /*
@@ -3242,6 +3248,8 @@ logical8 masque_entiers_binaires(struct_
 
 #ifndef RPLARGS
 integer8 occupation_memoire(struct_objet *s_objet);
+integer8 longueur_chaine(struct_processus *s_etat_processus,
+		unsigned char *chaine);
 #endif
 
 /*