--- rpl/src/rplexternals.h	2010/01/26 15:22:44	1.1.1.1
+++ rpl/src/rplexternals.h	2010/05/24 10:58:37	1.9
@@ -1,6 +1,6 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.0.9
+  RPL/2 (R) version 4.0.16
   Copyright (C) 1989-2010 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
@@ -39,9 +39,10 @@
 ================================================================================
 */
 
-#define allocation(a) allocation((*rpl_arguments).s_etat_processus, a)
-#define copie_objet(a, b) copie_objet((*rpl_arguments).s_etat_processus, a, b)
-#define liberation(a) liberation((*rpl_arguments).s_etat_processus, a)
+#define allocation(a) librpl_allocation((*rpl_arguments).s_etat_processus, a)
+#define copie_objet(a, b) librpl_copie_objet( \
+			(*rpl_arguments).s_etat_processus, a, b)
+#define liberation(a) librpl_liberation((*rpl_arguments).s_etat_processus, a)
 
 /*
 --------------------------------------------------------------------------------
@@ -1035,8 +1036,8 @@
 
 #define intrinsic(function) { \
 	int __status; \
-	__status = wrapper_instruction_intrinseque(instruction_##function, \
-			rpl_arguments); \
+	__status = wrapper_instruction_intrinseque( \
+			instruction_##function, rpl_arguments); \
 	if (__status == 1) executionError(#function); \
 	if (__status == 2) systemError(#function); \
 	} while(0)