X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=components%2Flibrary%2FlibraryDb.ml;h=e82e91f97f1629295d149ba1d066d11234932218;hb=f1efdff5ded26d264f2848ff53c19fe2099682a3;hp=7ee8427f74086da808c463fac9391a324897efa8;hpb=abc2a8f11642390d930fbe81333f2f2b7467809d;p=helm.git diff --git a/components/library/libraryDb.ml b/components/library/libraryDb.ml index 7ee8427f7..e82e91f97 100644 --- a/components/library/libraryDb.ml +++ b/components/library/libraryDb.ml @@ -104,7 +104,7 @@ let clean_owner_environment () = match HSql.errno dbtype dbd with | HSql.No_such_table | HSql.Bad_table_error - | HSql.No_such_index -> prerr_endline statement; () + | HSql.No_such_index -> () | _ -> raise exn ) statements; ;;