Parent Directory | Revision Log | Patch
revision 1.37 by spiralvoice, Fri Jul 22 14:32:12 2005 UTC | revision 1.38 by spiralvoice, Mon Aug 29 14:54:59 2005 UTC | |
---|---|---|
# | Line 897 let file_verify file key begin_pos end_p | Line 897 let file_verify file key begin_pos end_p |
897 | result | result |
898 | with | with |
899 | | Not_found -> raise Not_found | | Not_found -> raise Not_found |
900 | | _ -> if !verbose_md4 then lprintf_nl () "Checksum computed: chunk MISSING"; | | e -> lprintf_nl () "Checksum computation failed: Exception: %s" (Printexc2.to_string e); |
901 | false | false |
902 | ||
903 | let file_mtime file = Unix32.mtime64 (file_fd file) | let file_mtime file = Unix32.mtime64 (file_fd file) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |