Re: Compilation error with OCaml 4.05

Oliver Bandel <[email protected]> Sun, 16 Jul 2017 18:07:22 +0200
Newsgroups gmane.comp.lang.ocaml.lib.net.devel
Message-ID <20170716180722.Horde.bSbUlhTmqVyNhqRHOd4j9l3@webmail.in-berlin.de>
This message is in MIME format.

--=_N2o99_4RpYY5-AYHGag4ni6
Content-Type: text/plain; charset=utf-8; format=flowed; DelSp=Yes
Content-Disposition: inline

Fix:

--- src/ocamlnet-4.1.2/src/netsys/netsys_posix.ml       2017-07-16  
17:56:18.361397096 +0200
+++ netsys_posix.ml     2017-07-16 17:33:02.207173822 +0200
@@ -719,7 +719,7 @@
  type open_flag1 = Unix.open_flag =
      O_RDONLY | O_WRONLY | O_RDWR | O_NONBLOCK | O_APPEND | O_CREAT | O_TRUNC
    | O_EXCL | O_NOCTTY | O_DSYNC | O_SYNC | O_RSYNC | O_SHARE_DELETE
-  | O_CLOEXEC
+  | O_CLOEXEC | O_KEEPEXEC
  #else
  #ifdef HAVE_O_SHARE_DELETE
  type open_flag1 = Unix.open_flag =






Zitat von Oliver Bandel <[email protected]> (Sun, 16 Jul 2017  
17:04:47 +0200)

> This is, what I get:
>
>  (I'm using ocamlnet-4.1.2.tar.gz)
>
> ======================================================================
> File "netsys_mem.ml", line 17, characters 0-143:
> Warning 3: deprecated: [@@noalloc] should be used instead of "noalloc"
> File "netsys_mem.ml", line 21, characters 0-143:
> Warning 3: deprecated: [@@noalloc] should be used instead of "noalloc"
> ocamlfind ocamlc -g  -safe-string  -package "bytes unix" -pp  
> "../../tools/cppo-0.9.4/cppo -include ../../config.cppo -D  
> HAVE_O_SHARE_DELETE -D HAVE_O_CLOEXEC -D HAVE_BYTES " -w -25 -c   
> netsys_signal.mli
> ocamlfind ocamlc -g  -safe-string  -package "bytes unix" -pp  
> "../../tools/cppo-0.9.4/cppo -include ../../config.cppo -D  
> HAVE_O_SHARE_DELETE -D HAVE_O_CLOEXEC -D HAVE_BYTES " -w -25 -c   
> netsys_signal.ml
> ocamlfind ocamlc -g  -safe-string  -package "bytes unix" -pp  
> "../../tools/cppo-0.9.4/cppo -include ../../config.cppo -D  
> HAVE_O_SHARE_DELETE -D HAVE_O_CLOEXEC -D HAVE_BYTES " -w -25 -c   
> netsys_crypto_types.mli
> ocamlfind ocamlc -g  -safe-string  -package "bytes unix" -pp  
> "../../tools/cppo-0.9.4/cppo -include ../../config.cppo -D  
> HAVE_O_SHARE_DELETE -D HAVE_O_CLOEXEC -D HAVE_BYTES " -w -25 -c   
> netsys_crypto_types.ml
> ocamlfind ocamlc -g  -safe-string  -package "bytes unix" -pp  
> "../../tools/cppo-0.9.4/cppo -include ../../config.cppo -D  
> HAVE_O_SHARE_DELETE -D HAVE_O_CLOEXEC -D HAVE_BYTES " -w -25 -c   
> netsys_crypto.mli
> ocamlfind ocamlc -g  -safe-string  -package "bytes unix" -pp  
> "../../tools/cppo-0.9.4/cppo -include ../../config.cppo -D  
> HAVE_O_SHARE_DELETE -D HAVE_O_CLOEXEC -D HAVE_BYTES " -w -25 -c   
> netsys_crypto.ml
> ocamlfind ocamlc -g  -safe-string  -package "bytes unix" -pp  
> "../../tools/cppo-0.9.4/cppo -include ../../config.cppo -D  
> HAVE_O_SHARE_DELETE -D HAVE_O_CLOEXEC -D HAVE_BYTES " -w -25 -c   
> netsys_crypto_modes.mli
> ocamlfind ocamlc -g  -safe-string  -package "bytes unix" -pp  
> "../../tools/cppo-0.9.4/cppo -include ../../config.cppo -D  
> HAVE_O_SHARE_DELETE -D HAVE_O_CLOEXEC -D HAVE_BYTES " -w -25 -c   
> netsys_crypto_modes.ml
> ocamlfind ocamlc -g  -safe-string  -package "bytes unix" -pp  
> "../../tools/cppo-0.9.4/cppo -include ../../config.cppo -D  
> HAVE_O_SHARE_DELETE -D HAVE_O_CLOEXEC -D HAVE_BYTES " -w -25 -c   
> netsys_posix.mli
> ocamlfind ocamlc -g  -safe-string  -package "bytes unix" -pp  
> "../../tools/cppo-0.9.4/cppo -include ../../config.cppo -D  
> HAVE_O_SHARE_DELETE -D HAVE_O_CLOEXEC -D HAVE_BYTES " -w -25 -c   
> netsys_posix.ml
> File "netsys_posix.ml", line 719, characters 0-193:
> Error: This variant or record definition does not match that of type
>          Unix.open_flag
>        The field O_KEEPEXEC is only present in the original definition.
> make[1]: *** [../../Makefile.rules:113: netsys_posix.cmo] Error 2
> make[1]: Leaving directory  
> '/home/oliver/AUR4/ocamlnet/src/ocamlnet-4.1.2/src/netsys'
> make: *** [Makefile:23: all] Error 2
> ==> ERROR: A failure occurred in build().
>     Aborting...
> ======================================================================
>
>
> Ciao,
>    Oliver
>
>
> ------------------------------------------------------------------------------
> Check out the vibrant tech community on one of the world's most
> engaging tech sites, Slashdot.org! http://sdm.link/slashdot
> _______________________________________________
> Ocamlnet-devel mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/ocamlnet-devel



--=_N2o99_4RpYY5-AYHGag4ni6
Content-Type: text/x-diff; name=netsys_posix.patch
Content-Disposition: attachment; size=459; filename=netsys_posix.patch

--- src/ocamlnet-4.1.2/src/netsys/netsys_posix.ml	2017-07-16 17:56:18.361397096 +0200
+++ netsys_posix.ml	2017-07-16 17:33:02.207173822 +0200
@@ -719,7 +719,7 @@
 type open_flag1 = Unix.open_flag =
     O_RDONLY | O_WRONLY | O_RDWR | O_NONBLOCK | O_APPEND | O_CREAT | O_TRUNC
   | O_EXCL | O_NOCTTY | O_DSYNC | O_SYNC | O_RSYNC | O_SHARE_DELETE
-  | O_CLOEXEC
+  | O_CLOEXEC | O_KEEPEXEC
 #else
 #ifdef HAVE_O_SHARE_DELETE
 type open_flag1 = Unix.open_flag =

--=_N2o99_4RpYY5-AYHGag4ni6
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
--=_N2o99_4RpYY5-AYHGag4ni6
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

_______________________________________________
Ocamlnet-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/ocamlnet-devel

--=_N2o99_4RpYY5-AYHGag4ni6--