Hi, Dave --
Would you reply to Camm Maguire'e email beow, please? I don't know
how you obtained gcl for your build, but I don't see the "sources"
directory he refers to, so I'm kind of lost.
lhug-0:~> ls -l /lusr/opt/gcl-2.6.8pre/
total 12
drwxr-sr-x 2 root bin 4096 Mar 2 14:20 bin
drwxr-sr-x 3 root bin 4096 Feb 17 17:33 lib
drwxr-sr-x 5 root bin 4096 Feb 17 17:33 share
lhug-0:~>
Thanks --
-- Matt
------- Start of forwarded message -------
To: gcl-devel@gnu.org
cc: Matt Kaufmann <kaufm...@cs.utexas.edu>
Subject: Re: still a problem with interrupts in 64-bit GCL
From: Camm Maguire <c...@maguirefamily.org>
Date: Tue, 03 Mar 2009 11:21:49 -0500
X-SpamAssassin-Status: No, hits=-2.6 required=5.0
X-UTCS-Spam-Status: No, hits=-72 required=165
Greetings! Could you please verify that the following patch is in
your rebuilt newly checked out cvs source?
Take care,
cvs -z9 -q diff -u -r 1.11.4.1.4.2 -r 1.11.4.1.4.2.14.1 usig2.c
Index: usig2.c
===================================================================
RCS file: /sources/gcl/gcl/o/usig2.c,v
retrieving revision 1.11.4.1.4.2
retrieving revision 1.11.4.1.4.2.14.1
diff -u -r1.11.4.1.4.2 -r1.11.4.1.4.2.14.1
- --- usig2.c 14 Sep 2003 02:30:45 -0000 1.11.4.1.4.2
+++ usig2.c 26 Feb 2009 18:08:02 -0000 1.11.4.1.4.2.14.1
@@ -228,13 +228,13 @@
SS1(p->free2[i],OBJ_LINK(p->free1[i]));
ad->tm_nfree --;
bcopy(beg ,&(p->buf[i]), amt);
- - bzero(beg+8,amt-8);
+ bzero(beg+sizeof(struct freelist),amt-sizeof(struct freelist));
x->d.m = 0;
if (p->free2[i])
{ x = (object) p->free2[i];
beg = (char *)x;
x->d.m = 0;
- - bzero(beg+8,amt-8);
+ bzero(beg+sizeof(struct freelist),amt-sizeof(struct
freelist));
SS1(ad->tm_free,OBJ_LINK(p->free2[i]));
ad->tm_nfree --;
}
- --
Camm Maguire c...@maguirefamily.org
==========================================================================
"The earth is but one country, and mankind its citizens." -- Baha'u'llah
------- End of forwarded message -------
_______________________________________________
Gcl-devel mailing list
Gcl-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/gcl-devel
