/[mldonkey]/mldonkey/src/utils/lib/unix32.ml
ViewVC logotype

Diff of /mldonkey/src/utils/lib/unix32.ml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.37 by spiralvoice, Sun Aug 28 11:09:14 2005 UTC revision 1.38 by spiralvoice, Mon Aug 29 14:54:59 2005 UTC
# Line 435  module MultiFile = struct Line 435  module MultiFile = struct
435        let fd = FDCache.local_force_fd file_out true in        let fd = FDCache.local_force_fd file_out true in
436        try        try
437          let v = f fd zero in          let v = f fd zero in
438            FDCache.close file_out;
439          Sys.remove temp_file;          Sys.remove temp_file;
440          v          v
441        with e ->        with e ->
442              FDCache.close file_out;
443            Sys.remove temp_file;            Sys.remove temp_file;
444            raise e            raise e
445    

Legend:
Removed from v.1.37  
changed lines
  Added in v.1.38

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26