diff options
author | Benjamin Pierce <bcpierce00@gmail.com> | 2016-05-14 11:28:49 -0400 |
---|---|---|
committer | Benjamin Pierce <bcpierce00@gmail.com> | 2016-05-14 11:28:49 -0400 |
commit | 4473822b5aa6de3e849ca6c958b365a71edbca4f (patch) | |
tree | 87047da4ea6a36fd1b6ae0d01c8c791b87af668b /src | |
parent | c403bd600eba20b01fc4ba088a6deef9f80db336 (diff) | |
download | unison-4473822b5aa6de3e849ca6c958b365a71edbca4f.zip unison-4473822b5aa6de3e849ca6c958b365a71edbca4f.tar.gz unison-4473822b5aa6de3e849ca6c958b365a71edbca4f.tar.bz2 |
Fix build for OCaml 4.03.0
Diffstat (limited to 'src')
-rwxr-xr-x | src/system/system_generic.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/system/system_generic.ml b/src/system/system_generic.ml index 22b5b6c..b9a4cef 100755 --- a/src/system/system_generic.ml +++ b/src/system/system_generic.ml @@ -57,7 +57,8 @@ let opendir f = let readdir = Unix.readdir let closedir = Unix.closedir let readlink = Unix.readlink -let symlink = Unix.symlink +(* BCP 5/16: Eta-expand for backward compatibility with OCaml <=4.02 *) +let symlink s1 s2 = Unix.symlink s1 s2 let chdir = Sys.chdir let getcwd = Sys.getcwd |