Skip site navigation (1)Skip section navigation (2)
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>