Date: Tue, 2 Feb 1999 15:07:59 -0500 (EST) From: Mikhail Teterin <mi@misha.cisco.com> To: ports@FreeBSD.ORG, tg@FreeBSD.ORG Subject: ctk port and tcl8.0 Message-ID: <199902022008.PAA25529@misha.cisco.com>
next in thread | raw e-mail | index | archive | help
Turns out, there is only one thing preventing ctk from building with tcl8.0: --- ctkDisplay.c.orig Tue Feb 2 14:43:16 1999 +++ ctkDisplay.c Tue Feb 2 14:44:49 1999 @@ -168,5 +168,5 @@ int fd; - Tcl_File tf; + ClientData data; type = strchr(termName, ':'); @@ -196,7 +196,11 @@ } } - tf = Tcl_GetChannelFile(dispPtr->chan, TCL_READABLE); - fd = (int) Tcl_GetFileInfo(tf, NULL); - + if(TCL_OK != Tcl_GetChannelHandle(dispPtr->chan, TCL_READABLE, &data)) { + Tcl_AppendResult(interp, "couldn't get file descriptor of \"", + dispPtr->name, "\"", (char *) NULL); + goto error; + } + fd = (int) data; + if (!isatty(fd)) { Tcl_AppendResult(interp, "display device \"", dispPtr->name, Then, there is also a ctk4.2b1-patch, available on the same url as the distfile. It appears, the port already has some stuff from that URL (all of it?). I may dig in and make a ctk80 port, but may be someone who knows can prevent me from reinventing the wheel and do it -- there is only thing, that needs changing in the core, and the patch for it is quoted above. Other then this, it compiles and runs. Although I did not perform serious testing yet, I did manage to create buttons :) Thanks! -mi To Unsubscribe: send mail to majordomo@FreeBSD.org with "unsubscribe freebsd-ports" in the body of the message
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?199902022008.PAA25529>