weak hashtable weakness both is not weak

Create issue
Issue #166 invalid
Takashi Kato repo owner created an issue

This should return gone

(import (rnrs) (sagittarius))

;;(define wh (make-weak-eqv-hashtable :weakness 'key))
(define wh (make-weak-eqv-hashtable))

(weak-hashtable-set! wh (string->symbol "boo") #t)
(gc)
(weak-hashtable-ref wh (string->symbol "boo") 'gone)

but #t.

NOTE: if explicitly specify weakness key, then it returns gone

Comments (1)

  1. Log in to comment