Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-19 10:47:33 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Bugfix in hash-table-copy which didn't copy hash function.

Browse source 
Patch from Alexei Lozovsky.
This commit is contained in:
Alex Shinn 2015-03-13 07:10:41 +09:00
parent 2db64f67f8
commit 3000523427
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lib/srfi/69/interface.scm
View file

@ -111,6 +111,7 @@
(define (hash-table-copy table) (define (hash-table-copy table)
(assert-hash-table "hash-table-copy" table) (assert-hash-table "hash-table-copy" table)
(let ((res (make-hash-table (hash-table-equivalence-function table)))) (let ((res (make-hash-table (hash-table-equivalence-function table)
(hash-table-hash-function table))))
(hash-table-merge! res table) (hash-table-merge! res table)
res)) res))