Path: csiph.com!x330-a1.tempe.blueboxinc.net!usenet.pasdenom.info!gegeweb.org!de-l.enfer-du-nord.net!feeder1.enfer-du-nord.net!newsfeed.kamp.net!newsfeed.kamp.net!fu-berlin.de!uni-berlin.de!not-for-mail
From: David Kuehling <dvdkhlng@gmx.de>
Newsgroups: comp.lang.forth
Subject: Re: colorForth on Linux
Date: Mon, 20 Feb 2012 00:16:08 +0100
Lines: 46
Message-ID: <87haymo1mv.fsf@snail.Pool>
References: <87d39b21a4.fsf@snail.Pool>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: news.uni-berlin.de jXoJZHEPfJOzhaVP7kYgkg3ebvEN2deSTa2m9GN4hRb9cmaq8=
Cancel-Lock: sha1:kdLI1JKiq2cEU8eRRuFbBSiedBg=
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.3 (gnu/linux)
Xref: x330-a1.tempe.blueboxinc.net comp.lang.forth:9629

>>>>> "David" == David Kuehling <dvdkhlng@gmx.de> writes:

> Hi, the Linux ports of colorForth don't seem to be actively maintained
> currently, so I thought I'd post about my experience here.  The
> XcolorForth/GLcolorForth ports were done by Mark Slicker, whose
> website seems to have fallen victim to bit-rot.  The only copies I can
> find are those hosted by Tim Neitz [1] or by the ForthFreak wiki [2].

> [1] http://www.dnd.utwente.nl/~tim/colorforth/mslicker/GLcolorForth/
> [2] http://forthfreak.net/index.cgi?colorForth

Short addition: not only does the 'compile' script of GLcolorForth need
some fixing; also the keyboard input handling code does not work
properly on my Debian Squeeze system: keyboard events take many seconds
to be delivered.  This short patch to 'main.c' fixes the problem here:

--8<--
Index: /trunk/forth/glcolorforth/main.c
===================================================================
--- /trunk/forth/glcolorforth/main.c	(revision 450)
+++ /trunk/forth/glcolorforth/main.c	(revision 452)
@@ -59,6 +59,10 @@
 int key () {
     XEvent event;
-    if (XPending(display) > 0) {
-	XNextEvent (display, &event);
+    
+    /* 2011-02-19/david : added Xsync, made it loop below */
+    XSync(display, False);
+    
+    while (XPending(display) > 0) {
+        XNextEvent (display, &event);
 	switch (event.type) {
 	case KeyPress:
--8<--

For now I've put a fixed version on my SVN server:
http://mosquito.dyndns.tv/freesvn/trunk/forth/glcolorforth/ , but might
eventually move everything to sourceforge.

cheers,

David
-- 
GnuPG public key: http://dvdkhlng.users.sourceforge.net/dk.gpg
Fingerprint: B17A DC95 D293 657B 4205  D016 7DEF 5323 C174 7D40