if the plugin socket creator raises an exception, remove the broken socket from the...

[simgrid.git] / src / gras / Transport / transport.c

diff --git a/src/gras/Transport/transport.c b/src/gras/Transport/transport.c
index e668b3f..8c028e4 100644 (file)
--- a/src/gras/Transport/transport.c
+++ b/src/gras/Transport/transport.c
@@ -298,7 +298,9 @@ gras_socket_client_ext(const char *host,
           sock->outgoing?'y':'n',
           sock->accepting?'y':'n');
   } CATCH(e) {
           sock->outgoing?'y':'n',
           sock->accepting?'y':'n');
   } CATCH(e) {

-    free(sock);
+     xbt_dynar_pop(((gras_trp_procdata_t)
+                   gras_libdata_by_id(gras_trp_libdata_id))->sockets,NULL);
+     free(sock);

     RETHROW;
   }
 
     RETHROW;
   }