mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-04-29 19:30:36 +02:00
Fix hash-table-merge! bug.
* module/srfi/srfi-69.scm : fold over second hash table.
This commit is contained in:
parent
f591ad28f1
commit
23042a1ef9
1 changed files with 1 additions and 1 deletions
|
@ -330,7 +330,7 @@ Answer the final F result."
|
|||
"Add all key/value pairs from OTHER-HT to HT, overriding HT's
|
||||
mappings where present. Return HT."
|
||||
(hash-table-fold
|
||||
ht (lambda (k v ign) (hash-table-set! ht k v)) #f)
|
||||
other-ht (lambda (k v ign) (hash-table-set! ht k v)) #f)
|
||||
ht)
|
||||
|
||||
;;; srfi-69.scm ends here
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue