]> matita.cs.unibo.it Git - helm.git/commitdiff
Workaround for a BSD bug (submitted by Boender).
authorClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Tue, 6 Mar 2012 16:25:44 +0000 (16:25 +0000)
committerClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Tue, 6 Mar 2012 16:25:44 +0000 (16:25 +0000)
matita/components/extlib/hExtlib.ml

index 0b13cd83e4566013b74ec3b18019c4d2e542482d..8871a35df0cc30f3bf1a4e27aacd9216c9097dd0 100644 (file)
@@ -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