--- rpl/src/instructions_r3.c	2015/01/05 13:12:38	1.60
+++ rpl/src/instructions_r3.c	2020/01/10 11:15:47	1.78
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.19
-  Copyright (C) 1989-2015 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.32
+  Copyright (C) 1989-2020 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -819,10 +819,10 @@ instruction_rceq(struct_processus *s_eta
 				"       %s, %s, %s, %s, %s,\n"
 				"       %s, %s, %s, %s, %s,\n"
 				"       %s, %s, %s, %s,\n"
-				"       %s, %s\n",
+				"       %s, %s, %s\n",
 				d_INT, d_REL, d_CPL, d_VIN, d_VRL, d_VCX, d_MIN, d_MRL, d_MCX,
 				d_TAB, d_BIN, d_NOM, d_CHN, d_LST, d_ALG, d_RPN, d_FCH, d_SCK,
-				d_SQL, d_SLB, d_PRC, d_MTX);
+				d_SQL, d_SLB, d_PRC, d_MTX, d_REC);
 
 		return;
 	}
@@ -1113,8 +1113,8 @@ instruction_recall(struct_processus *s_e
 					d_exec_path, d_exec_path,
 					d_exec_path, ds_preprocesseur, nom_fichier_temporaire);
 
-			if (alsprintf(&executable_candidat, "%s/bin/rpliconv",
-					d_exec_path) < 0)
+			if (alsprintf(s_etat_processus, &executable_candidat,
+					"%s/bin/rpliconv", d_exec_path) < 0)
 			{
 				(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 				return;
@@ -1129,8 +1129,8 @@ instruction_recall(struct_processus *s_e
 
 			free(executable_candidat);
 
-			if (alsprintf(&executable_candidat, "%s/bin/rplfile",
-					d_exec_path) < 0)
+			if (alsprintf(s_etat_processus, &executable_candidat,
+					"%s/bin/rplfile", d_exec_path) < 0)
 			{
 				(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 				return;
@@ -1145,8 +1145,8 @@ instruction_recall(struct_processus *s_e
 
 			free(executable_candidat);
 
-			if (alsprintf(&executable_candidat, "%s/bin/rplpp",
-					d_exec_path) < 0)
+			if (alsprintf(s_etat_processus, &executable_candidat,
+					"%s/bin/rplpp", d_exec_path) < 0)
 			{
 				(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 				return;
@@ -1161,8 +1161,8 @@ instruction_recall(struct_processus *s_e
 
 			free(executable_candidat);
 
-			if (alsprintf(&executable_candidat, "%s/bin/rplawk",
-					d_exec_path) < 0)
+			if (alsprintf(s_etat_processus, &executable_candidat,
+					"%s/bin/rplawk", d_exec_path) < 0)
 			{
 				(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 				return;
@@ -1197,8 +1197,8 @@ instruction_recall(struct_processus *s_e
 					(*s_etat_processus).rpl_home, ds_preprocesseur,
 					nom_fichier_temporaire);
 
-			if (alsprintf(&executable_candidat, "%s/bin/rpliconv",
-					(*s_etat_processus).rpl_home) < 0)
+			if (alsprintf(s_etat_processus, &executable_candidat,
+					"%s/bin/rpliconv", (*s_etat_processus).rpl_home) < 0)
 			{
 				(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 				return;
@@ -1213,8 +1213,8 @@ instruction_recall(struct_processus *s_e
 
 			free(executable_candidat);
 
-			if (alsprintf(&executable_candidat, "%s/bin/rplfile",
-					(*s_etat_processus).rpl_home) < 0)
+			if (alsprintf(s_etat_processus, &executable_candidat,
+					"%s/bin/rplfile", (*s_etat_processus).rpl_home) < 0)
 			{
 				(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 				return;
@@ -1229,8 +1229,8 @@ instruction_recall(struct_processus *s_e
 
 			free(executable_candidat);
 
-			if (alsprintf(&executable_candidat, "%s/bin/rplpp",
-					(*s_etat_processus).rpl_home) < 0)
+			if (alsprintf(s_etat_processus, &executable_candidat,
+					"%s/bin/rplpp", (*s_etat_processus).rpl_home) < 0)
 			{
 				(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 				return;
@@ -1245,8 +1245,8 @@ instruction_recall(struct_processus *s_e
 
 			free(executable_candidat);
 
-			if (alsprintf(&executable_candidat, "%s/bin/rplawk",
-					d_exec_path) < 0)
+			if (alsprintf(s_etat_processus, &executable_candidat,
+					"%s/bin/rplawk", d_exec_path) < 0)
 			{
 				(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 				return;