blob: 6135d10884b9b3f824373aea351c058d6c87c2d9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
$NetBSD: patch-src_system_system__generic.ml,v 1.3 2019/03/21 10:02:58 jaapb Exp $
Needed for compatibility with OCaml 4.08
--- src/system/system_generic.ml.orig 2018-01-27 21:12:13.000000000 +0000
+++ src/system/system_generic.ml
@@ -47,7 +47,7 @@ let open_out_gen = open_out_gen
let chmod = Unix.chmod
let chown = Unix.chown
let utimes = Unix.utimes
-let link = Unix.link
+let link s d = Unix.link s d
let openfile = Unix.openfile
let opendir f =
let h = Unix.opendir f in
|
