method unlink rp =
match rp with Relpath(rel) ->
let fqp = String.concat "/" [root_dir;rel] in
let fqp_in = String.concat "." [fqp;"in"] in
let fqp_out = String.concat "." [fqp;"out"] in
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 ())