--- rpl/src/bibliotheques_externes.c 2010/06/09 12:19:13 1.11 +++ rpl/src/bibliotheques_externes.c 2010/08/26 19:07:34 1.18 @@ -1,6 +1,6 @@ /* ================================================================================ - RPL/2 (R) version 4.0.16 + 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" static pthread_mutex_t mutex = PTHREAD_MUTEX_INITIALIZER; @@ -334,6 +334,8 @@ chargement_bibliotheque(struct_processus } } + dlerror(); + if (pthread_mutex_unlock(&mutex) != 0) { (*s_etat_processus).erreur_systeme = d_es_processus; @@ -1118,6 +1120,8 @@ execution_fonction_de_bibliotheque(struc } } + dlerror(); + if (pthread_mutex_unlock(&mutex) != 0) { (*s_etat_processus).erreur_systeme = d_es_processus; @@ -1663,7 +1667,6 @@ tri_base_symboles_externes(struct_proces do { indice_i = indice_j; - terminaison_boucle_3 = d_faux; do