l...@gnu.org (Ludovic Courtès) writes:
> Mike Gran <spk...@yahoo.com> writes:
>
>> --- 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;
>> }
>
> Hmm, how can we have "SCM_PTAB_ENTRY (port) == NULL" at this point?
Of course I read Neil's commit right after: the answer is "if PORT is
closed."
Thanks for finding it out!
Ludo'.
