From 180a9e14b807295aa31966a52bfd732647458ef9 Mon Sep 17 00:00:00 2001 From: "Ricardo G. Herdt" Date: Fri, 8 May 2020 01:37:24 +0200 Subject: [PATCH] Fix hash-table-merge! bug. * module/srfi/srfi-69.scm : fold over second hash table. --- module/srfi/srfi-69.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/module/srfi/srfi-69.scm b/module/srfi/srfi-69.scm index b9486c465..91bcc77db 100644 --- a/module/srfi/srfi-69.scm +++ b/module/srfi/srfi-69.scm @@ -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 -- 2.20.1