--- rpl/src/instructions_c4.c 2015/09/18 13:41:12 1.65 +++ rpl/src/instructions_c4.c 2019/02/03 14:40:36 1.76 @@ -1,7 +1,7 @@ /* ================================================================================ - RPL/2 (R) version 4.1.23 - Copyright (C) 1989-2015 Dr. BERTRAND Joël + RPL/2 (R) version 4.1.31 + Copyright (C) 1989-2019 Dr. BERTRAND Joël This file is part of RPL/2. @@ -780,7 +780,6 @@ instruction_close(struct_processus *s_et if (fclose((*descripteur).descripteur_c) != 0) { - perror("fclose"); free(descripteur); liberation(s_etat_processus, s_objet_argument);