----- Original Message ----
> From: Linas Vepstas <linasveps...@gmail.com>
> To: Andy Wingo <wi...@pobox.com>
> Cc: Ludovic Courtès <l...@gnu.org>; guile-devel@gnu.org
> Sent: Sunday, June 21, 2009 2:17:46 AM
> Subject: Re: GNU Guile 1.9.0 released (alpha)
>
> 2009/6/20 Andy Wingo :
> > On Sat 20 Jun 2009 05:00, Linas Vepstas writes:
> >
> >> Running r6rs-ports.test
> >> /bin/sh: line 4: 7268 Segmentation fault ${dir}$tst
> >> FAIL: check-guile
> >
> > A few more things you could try, in addition to what Neil and Ludovic
> > said:
> >
> > ./check-guile r6rs-ports.test
> >
> > Does this segfault for you?
>
> No .... err yes .. it passed 3 times, failed the fourth time.
> I guess there's a race condition,looks to be in the gc.
>
> > If so:
> >
> > ./check-guile -i meta/gdb-uninstalled-guile r6rs-ports.test
>
> It seems to crash once out of every 5-10 times.
>
Hi guys.
Not really in a position to help, since I'm still AFK, but,
somewhere along the line I pushed this patch to r6rs vectors
in the String_abstraction2 tree.
--- a/libguile/r6rs-ports.c
+++ b/libguile/r6rs-ports.c
@@ -210,7 +210,10 @@ static SCM
cbp_mark (SCM port)
{
/* Mark the underlying method and object vector. */
- return SCM_PACK (SCM_STREAM (port));
+ if (SCM_PTAB_ENTRY (port) != NULL)
+ return SCM_PACK (SCM_STREAM (port));
+ else
+ return SCM_BOOL_F;
}
