X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=matita%2Fcomponents%2Fextlib%2FhExtlib.ml;fp=matita%2Fcomponents%2Fextlib%2FhExtlib.ml;h=8871a35df0cc30f3bf1a4e27aacd9216c9097dd0;hb=1a11ddfaed43c681cf15f180b90ad429e092a219;hp=0b13cd83e4566013b74ec3b18019c4d2e542482d;hpb=b2290acc0159c6ef4ccb1f628e3b649413fad87b;p=helm.git diff --git a/matita/components/extlib/hExtlib.ml b/matita/components/extlib/hExtlib.ml index 0b13cd83e..8871a35df 100644 --- a/matita/components/extlib/hExtlib.ml +++ b/matita/components/extlib/hExtlib.ml @@ -437,6 +437,7 @@ let mkdir path = Unix.mkdir path 0o755; chmod 0o2775 path with | Unix.Unix_error (Unix.EEXIST,_,_) -> () + | Unix.Unix_error (Unix.EISDIR,_,_) -> () (* work-around for a bug in FreeBSD *) | Unix.Unix_error (e,_,_) -> raise (Failure