--- rpl/src/messages.c	2012/01/25 16:38:30	1.49
+++ rpl/src/messages.c	2022/09/07 13:40:41	1.91
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.6
-  Copyright (C) 1989-2012 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.
 
@@ -1337,6 +1337,123 @@ messages(struct_processus *s_etat_proces
 				}
 
 				break;
+			}
+
+			case d_ex_instruction_indisponible :
+			{
+				if ((*s_etat_processus).langue == 'F')
+				{
+					chaine = "+++Erreur : Instruction intrinsèque non "
+							"disponible";
+				}
+				else
+				{
+					chaine = "+++Error : Unavailable intrinsic instruction";
+				}
+
+				break;
+			}
+
+			case d_ex_chiffrement :
+			{
+				if ((*s_etat_processus).langue == 'F')
+				{
+					chaine = "+++Erreur : Erreur dans les routines "
+							"de chiffrement";
+				}
+				else
+				{
+					chaine = "+++Error : Cipher error";
+				}
+
+				break;
+			}
+
+			case d_ex_chiffrement_indisponible :
+			{
+				if ((*s_etat_processus).langue == 'F')
+				{
+					chaine = "+++Erreur : Algorithme de chiffrement "
+							"indisponible";
+				}
+				else
+				{
+					chaine = "+++Error : Unavailable cipher algorithm";
+				}
+
+				break;
+			}
+
+			case d_ex_longueur_clef_chiffrement :
+			{
+				if ((*s_etat_processus).langue == 'F')
+				{
+					chaine = "+++Erreur : Longueur invalide de la clef "
+							"de chiffrement";
+				}
+				else
+				{
+					chaine = "+++Error : Invalide key length";
+				}
+
+				break;
+			}
+
+			case d_ex_taille_message :
+			{
+				if ((*s_etat_processus).langue == 'F')
+				{
+					chaine = "+++Erreur : Message trop long";
+				}
+				else
+				{
+					chaine = "+++Error : Message size";
+				}
+
+				break;
+			}
+
+			case d_ex_type_externe_dup :
+			{
+				if ((*s_etat_processus).langue == 'F')
+				{
+					chaine = "+++Erreur : Duplication d'un type externe";
+				}
+				else
+				{
+					chaine = "+++Error : External type duplication";
+				}
+
+				break;
+			}
+
+			case d_ex_type_externe_drop :
+			{
+				if ((*s_etat_processus).langue == 'F')
+				{
+					chaine = "+++Erreur : Libération d'un type externe";
+				}
+				else
+				{
+					chaine = "+++Error : External type freeing";
+				}
+
+				break;
+			}
+
+			case d_ex_simplification :
+			{
+				if ((*s_etat_processus).langue == 'F')
+				{
+					chaine = "+++Erreur : Erreur de simplification d'une "
+							"expression";
+				}
+				else
+				{
+					chaine = "+++Error : Simplification error";
+				}
+
+				break;
 			}
 
 			case -1 : // Fonction externe