Re: [Gcl-devel] GCL-TK

[Camm Maguire]

"Mike Thomas" <address@hidden> writes:

> And further to this,
> 
> The reason that "si::our-write" is failing is that the fd is bad.
> 
> =================================================
> c:\cvs\gcl>start c:/cvs/gcl/gcl-tk/gcltkaux 127.0.0.1 5016 1436
> OUR-WRITE: starting with 43 bytes
> 
> Error: Connect failure: "write1: errno 9, tot bytes 43, still to send 43"
> Fast links are on: do (si::use-fast-links nil) for debugging
> Error signalled by EVAL.
> Broken at SYSTEM:OUR-WRITE.  Type :H for Help.
> TK>>:q
> =================================================
> 
> Has anyone got this code working on Unix platforms?
> 

Well, the tcl/tk gui certainly works on Linux x86 as manifested in
xmaxima, at least.

> Any ideas about where to proceed?
> 

I'd do a backtrace in gdb at the offending line in write1, which
appears to be comm.c:222, and find out where the write1 is called
from, and who setup the file descriptor.  My guess is that there is an
open or socket call somewhere that is not adequately verified.

Take care,

> Cheers
> 
> Mike Thomas.
> 
> 
> ----- Original Message -----
> From: "Mike Thomas" <address@hidden>
> To: <address@hidden>
> Sent: Friday, June 07, 2002 1:58 PM
> Subject: [Gcl-devel] GCL-TK
> 
> 
> > Hi all.
> >
> > Further to my earlier message about the new Mingw32 socket code; I suspect
> > that it is substantially functional as I am able to launch and connect to
> a
> > tcl interpreter as shown below.
> >
> > Unfortunately the connection then fails.  Whether this is the socket code
> or
> > the way I have handled the server process by launching a thread in guis.c
> > (Win32 has no fork()) I don't know at this stage, but I would welcome
> > comments from socket and process experienced people on the code I have
> > checked in today.
> >
> > Cheers
> >
> > Mike Thomas.
> >
> >
> > ============== Lisp console ========================
> > $ unixport/saved_gcl
> > GCL (GNU Common Lisp)  Version(2.5.0) Fri Jun  7 12:45:57  2002
> > Licensed under GNU Library General Public License
> > Contains Enhancements by W. Schelter
> >
> > >(in-package "tk")
> >
> > #<"TK" package>
> >
> > TK>(tkconnect)
> >
> > Loading c:/cvs/gcl/gcl-tk/tkl.o
> > start address -T 101d0000 Finished loading c:/cvs/gcl/gcl-tk/tkl.o
> >
> > "c:/cvs/gcl/gcl-tk/gcltksrv 127.0.0.1 5016 1228 :0.0 "
> > c:\cvs\gcl>set GCL_TK_DIR=c:/cvs/gcl/gcl-tk
> >
> > c:\cvs\gcl>set TCL_LIBRARY=c:/lang/tcl/lib/tcl8.3
> >
> > c:\cvs\gcl>set TK_LIBRARY=c:/lang/tcl/lib/tcl8.3
> >
> > c:\cvs\gcl>c:/cvs/gcl/gcl-tk/gcltkaux 127.0.0.1 5016 1940
> >
> > Error: Connect failure: ""
> > Fast links are on: do (si::use-fast-links nil) for debugging
> > Error signalled by EVAL.
> > Broken at SYSTEM:OUR-WRITE.  Type :H for Help.
> > TK>>
> >
> >
> > ============ gcltkaux.exe console ====================
> > connected to 127.0.0.1 5016
> >
> >
> >
> > _______________________________________________
> > Gcl-devel mailing list
> > address@hidden
> > http://mail.gnu.org/mailman/listinfo/gcl-devel
> >
> 
> 
> _______________________________________________
> Gcl-devel mailing list
> address@hidden
> http://mail.gnu.org/mailman/listinfo/gcl-devel
> 
> 

-- 
Camm Maguire                                            address@hidden
==========================================================================
"The earth is but one country, and mankind its citizens."  --  Baha'u'llah