- Directfifowatcher.closeentry fqp;
- try
- Unix.unlink fqp_in;
- Unix.unlink fqp_out
- with _ ->
- logprint "Hm. %s disappeared. Looks like slice %s shot itself in the foot\n" fqp (this#get_slice_name ())
+ let fqp_control = String.concat "." [fqp;"out"] in
+
+ if (this#is_fd_passer rel) then
+ begin
+ Unixsocketwatcher.closeentry fqp;
+ try
+ Unix.unlink fqp_control
+ with _ ->
+ logprint "Hm. %s disappeared. Looks like slice %s shot itself in the foot\n" fqp (this#get_slice_name ())
+ end
+ else
+ begin
+ Directfifowatcher.closeentry fqp;
+ try
+ Unix.unlink fqp_in;
+ Unix.unlink fqp_out
+ with _ ->
+ logprint "Hm. %s disappeared. Looks like slice %s shot itself in the foot\n" fqp (this#get_slice_name ())
+ end