On Wed, 16 Feb 2000, Alex Stark wrote:
> -------------------------- Test program
> #! /bin/sh
> exec guile -s $0 $*
> !#
>
> (display (hashq 'position 5)) (newline)
> (display (hashq 'fluff 5)) (newline)
>
> (define A 'position)
>
> (display (hashq 'position 5)) (newline)
>
>
> -------------------------- Output
> [pilot]$ bugtest
> 0
> 1
> 3
For all of you who failed to reproduce that behaviour, perform a garbage
collection in between. For me it did not work otherwise.
(display (hashq 'position 5)) (newline) --> 2
(gc)
(display (hashq 'position 5)) (newline) --> 0
This is with a current guile from cvs.
Best regards
Dirk Herrmann