Date: Sat, 06 Aug 2005 16:40:43 +0900 From: NAKAMURA Takeshi <ta.nakamura@crs.co.jp> To: FreeBSD-gnats-submit@FreeBSD.org, freebsd-ports-bugs@FreeBSD.org Subject: Re: ports/84603: [PATCH] ports update: net/unison-devel Message-ID: <20050806153214.29C6.TA.NAKAMURA@crs.co.jp> In-Reply-To: <20050806103451.29C3.TA.NAKAMURA@crs.co.jp> References: <200508060110.j761ALGu044031@freefall.freebsd.org> <20050806103451.29C3.TA.NAKAMURA@crs.co.jp>
next in thread | previous in thread | raw e-mail | index | archive | help
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;
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?20050806153214.29C6.TA.NAKAMURA>