--- rpl/src/compilation.c	2010/06/24 10:10:40	1.12
+++ rpl/src/compilation.c	2010/08/26 19:07:35	1.19
@@ -1,6 +1,6 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.0.17
+  RPL/2 (R) version 4.0.19
   Copyright (C) 1989-2010 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
@@ -20,7 +20,7 @@
 */
 
 
-#include "rpl.conv.h"
+#include "rpl-conv.h"
 
 
 /*
@@ -830,19 +830,19 @@ swap(void *variable_1, void *variable_2,
 	register unsigned char		*t_var_2;
 	register unsigned char		variable_temporaire;
 
-	register signed long		i;
+	register unsigned long		i;
 
 	t_var_1 = (unsigned char *) variable_1;
 	t_var_2 = (unsigned char *) variable_2;
 
-	i = taille;
-
-	for(i--; i >= 0; i--)
+	for(i = 0; i < taille; i++)
 	{
-		variable_temporaire = t_var_1[i];
-		t_var_1[i] = t_var_2[i];
-		t_var_2[i] = variable_temporaire;
+		variable_temporaire = (*t_var_1);
+		(*(t_var_1++)) = (*t_var_2);
+		(*(t_var_2++)) = variable_temporaire;
 	}
+
+	return;
 }