Work around weak-value hash table bug in `define-wrapped-pointer-type'.
authorLudovic Courtès <ludo@gnu.org>
Sun, 13 Mar 2011 15:09:55 +0000 (16:09 +0100)
committerLudovic Courtès <ludo@gnu.org>
Sun, 13 Mar 2011 15:09:55 +0000 (16:09 +0100)
commitca33b501a93f8de389c1e3e1bc987f63b6912029
tree6fb200837171f7304cac7b2a3a14b489ad892301
parentb075a6d766c2ffe7c575b63648d8ae0d51b5dd3a
Work around weak-value hash table bug in `define-wrapped-pointer-type'.

* module/system/foreign.scm (define-wrapped-pointer-type)[wrap]: Use
  `hash-ref' and `hash-set!' instead of `hash-create-handle!' and
  `set-cdr!'.
module/system/foreign.scm