--- rpl/src/analyse.c	2010/09/06 16:50:16	1.31
+++ rpl/src/analyse.c	2011/04/11 13:02:12	1.36.2.1
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.0.19
-  Copyright (C) 1989-2010 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.0.22
+  Copyright (C) 1989-2011 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -468,6 +468,7 @@ initialisation_instructions(struct_proce
 	INSTRUCTION("LINE", instruction_line);
 	INSTRUCTION("LNP1", instruction_lnp1);
 	INSTRUCTION("LOCK", instruction_lock);
+	INSTRUCTION("L->T", instruction_l_vers_t);
 	INSTRUCTION("MANT", instruction_mant);
 	INSTRUCTION("MARK", instruction_mark);
 	//INSTRUCTION("MAXR")
@@ -571,6 +572,7 @@ initialisation_instructions(struct_proce
 	INSTRUCTION("TRNC", instruction_trnc);
 	INSTRUCTION("TRUE", instruction_true);
 	INSTRUCTION("TYPE", instruction_type);
+	INSTRUCTION("T->L", instruction_t_vers_l);
 	INSTRUCTION("UTPC", instruction_utpc);
 	INSTRUCTION("UTPF", instruction_utpf);
 	INSTRUCTION("UTPN", instruction_utpn);
@@ -896,9 +898,6 @@ initialisation_instructions(struct_proce
 }
 
 
-#ifndef OS2
-extern inline
-#endif
 void *
 analyse_instruction(struct_processus *s_etat_processus, unsigned char *ptr)
 {
@@ -972,6 +971,11 @@ analyse(struct_processus *s_etat_process
 
 	void							(*instruction)();
 
+#	ifdef DMALLOC
+	BUG(dmalloc_verify(NULL) == DMALLOC_VERIFY_ERROR,
+			printf("HEAP CORRUPTION!"));
+#	endif
+
 	errno = 0;
 	(*s_etat_processus).var_volatile_exception_gsl = 0;