--- src/utils/cdk/zip.ml.orig	Wed Nov 23 14:46:54 2016
+++ src/utils/cdk/zip.ml	Wed Nov 23 14:46:57 2016
@@ -72,8 +72,6 @@ type out_file =
     mutable of_entries: entry list;
     of_comment: string }
 
-exception Error of string * string * string
-
 (* Return the position of the last occurrence of s1 in s2, or -1 if not
    found. *)
 
