--- rpl/src/instructions_i4.c 2010/04/07 15:40:24 1.8 +++ rpl/src/instructions_i4.c 2011/06/24 20:31:38 1.26 @@ -1,7 +1,7 @@ /* ================================================================================ - RPL/2 (R) version 4.0.14 - Copyright (C) 1989-2010 Dr. BERTRAND Joël + RPL/2 (R) version 4.1.0.prerelease.4 + Copyright (C) 1989-2011 Dr. BERTRAND Joël This file is part of RPL/2. @@ -20,7 +20,7 @@ */ -#include "rpl.conv.h" +#include "rpl-conv.h" /* @@ -176,6 +176,7 @@ instruction_in(struct_processus *s_etat_ if ((*s_objet_resultat_intermediaire).type != INT) { + liberation(s_etat_processus, s_objet_resultat_intermediaire); liberation(s_etat_processus, s_objet_argument_1); liberation(s_etat_processus, s_objet_argument_2); liberation(s_etat_processus, s_objet_resultat);