ports/84603: [PATCH] ports update: net/unison-devel

[NAKAMURA Takeshi]

i got
% uname -smr
FreeBSD 4.11-STABLE i386
% cd /usr/ports/net/unison-devel ; make
ocamlopt -I lwt -I ubase -c /.a/ports/net/unison-devel/work/unison-2.13.16/pty.c
/.a/ports/net/unison-devel/work/unison-2.13.16/pty.c: In function `c_openpty':
/.a/ports/net/unison-devel/work/unison-2.13.16/pty.c:46: syntax error before `pair'
/.a/ports/net/unison-devel/work/unison-2.13.16/pty.c:47: `pair' undeclared (first use in this function)
/.a/ports/net/unison-devel/work/unison-2.13.16/pty.c:47: (Each undeclared identifier is reported only once
/.a/ports/net/unison-devel/work/unison-2.13.16/pty.c:47: for each function it appears in.)
/.a/ports/net/unison-devel/work/unison-2.13.16/pty.c:50: warning: control reaches end of non-void function
gmake: *** [pty.o] Error 2
*** Error code 2
1 error

I can compiled on 4-STABLE with this patch.(compiler bug?)
patch for 4-STABLE

--- ports/net/unison-devel/files/patch-pty.c	6 Aug 2005 01:18:35 -0000
+++ ports/net/unison-devel/files/patch-pty.c	6 Aug 2005 15:54:27 +0900
@@ -1,5 +1,5 @@
 --- pty.c.orig	Sat Aug  6 10:17:07 2005
-+++ pty.c	Sat Aug  6 10:17:58 2005
++++ pty.c	Sat Aug  6 15:51:26 2005
 @@ -21,6 +21,7 @@
  #endif
  
@@ -8,3 +8,15 @@
  #include <libutil.h>
  #define HAS_OPENPTY 1
  #endif
+@@ -40,9 +41,10 @@
+ /* c_openpty: unit -> (int * Unix.file_descr) */
+ CAMLprim value c_openpty() {
+   int master,slave;
++  value pair;
+   if (openpty(&master,&slave,NULL,NULL,NULL) < 0)
+     uerror("openpty", (value) 0);
+-  value pair = alloc_tuple(2);
++  pair = alloc_tuple(2);
+   Store_field(pair,0,Val_int(master));
+   Store_field(pair,1,Val_int(slave));
+   return pair;