gcl-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Gcl-devel] Re: request for windows gcl 2.6.8.help from address@hidden


From: Camm Maguire
Subject: [Gcl-devel] Re: request for windows gcl 2.6.8.help from address@hidden
Date: 10 May 2007 22:13:59 -0400
User-agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.4

Greetings, and thank you all so much!

The test patch that Vadim and I have been working on is this (against
2.6.8pre, i.e. Version_2_6_8pre in cvs):
=============================================================================
Index: h/mingw.h
===================================================================
RCS file: /cvsroot/gcl/gcl/h/mingw.h,v
retrieving revision 1.17.6.6
diff -u -r1.17.6.6 mingw.h
--- h/mingw.h   23 Apr 2004 03:15:32 -0000      1.17.6.6
+++ h/mingw.h   27 Mar 2007 16:35:32 -0000
@@ -213,3 +213,6 @@
 
 /* End for cmpinclude */
 
+extern int mingwlisten(FILE *);
+#undef LISTEN_FOR_INPUT
+#define LISTEN_FOR_INPUT(fp) do {if (mingwlisten(fp)) return 0;} while (0)
Index: o/mingfile.c
===================================================================
RCS file: /cvsroot/gcl/gcl/o/mingfile.c,v
retrieving revision 1.5.18.1
diff -u -r1.5.18.1 mingfile.c
--- o/mingfile.c        15 Jan 2005 16:46:42 -0000      1.5.18.1
+++ o/mingfile.c        27 Mar 2007 16:35:34 -0000
@@ -1,5 +1,6 @@
 #include "include.h"
 #include "windows.h"
+#include "winsock2.h"
 
 extern object truename(object);
 extern object make_pathname();
@@ -52,3 +53,14 @@
        }
 }
 
+int
+mingwlisten(FILE *fp) {
+
+  int c = 0;
+  if (1) {
+    ioctlsocket(fileno(fp), FIONREAD, &c);
+    if (c<=0)
+      return 1;
+  }
+  return 0;
+}
=============================================================================

All that needs doing at the moment is to apply this and test it out,
particularly 'read-char-no-hang.

Longer term, we need testers of 2.7.0, though we have some time for
this.

May I suggest that the recipients of this message consider ourselves
the unofficial mingw support team in the absence of Mike Thomas, and
reply to the whole group if/when we find time to get any results, so
that we do not duplicate effort?

Thank you all again for your interest and support of GCL.

Take care,

Matt Kaufmann <address@hidden> writes:

> I can probably spare a few spare cycles to do something very simple on
> the mingw environment we already have installed on one machine on the
> 20th floor.  I really don't understand that environment very well, so
> perhaps all I can do is start up GCL (in an emacs shell I hope) and
> run some commands.  If I get stuck I can think of one or two people on
> our floor who I could probably bug (you know who you are!).
> 
> -- Matt
>    Date: Thu, 10 May 2007 16:01:37 -0500
>    X-Authentication-Warning: lhug-1.cs.utexas.edu: boyer set sender to 
> address@hidden using -f
>    From: Robert Boyer <address@hidden>
> 
>    address@hidden writes:
> 
>       > If there is anyone at your site who uses the mingw
>       > windows port and can spare a few moments remote
>       > debugging via email, please let me know.  This port
>       > is currently the albatross holding up 2.6.8.
> 
>    I have a vague idea that someone around here might know
>    how and be willing to lend a hand on this.
> 
>    If so, thanks.
> 
>    Bob
> 
> 

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




reply via email to

[Prev in Thread] Current Thread [Next in Thread]