mes: Add hash-for-each.

* mes/module/mes/scm.mes (hash-for-each): New function.
This commit is contained in:
Jan (janneke) Nieuwenhuizen 2019-11-13 08:29:06 +01:00
parent b6c2ce37f7
commit 384372d4ed
No known key found for this signature in database
GPG Key ID: F3C1A0D9C1D65273
1 changed files with 5 additions and 0 deletions

View File

@ -205,6 +205,11 @@
(define (hash-fold proc init table)
(fold proc init (hash-map->list cons table)))
(define (hash-for-each proc table)
(hash-map->list proc table)
;;(hash-fold (lambda (key value x) (proc key value)) #f table)
*unspecified*)
;; Variable
(define (make-undefined-variable)