Commits

Moritz Heidkamp  committed f5eb3a3

Change return type of map-each to undefined

Otherwise the scrutinizer generates some bogus warnings

  • Participants
  • Parent commits ed5c7f5

Comments (0)

Files changed (1)

File persistent-hash-map.scm

 (define (map-collect proc map)
   (map-reduce (lambda (k v r) (cons (proc k v) r)) '() map))
 
-(: map-each ((* * -> *) hash-map ->))
+(: map-each ((* * -> *) hash-map -> undefined))
 (define (map-each proc map)
-  (map-reduce (lambda (k v r) (proc k v) r) (void) map)
-  (values))
+  (map-reduce (lambda (k v r) (proc k v) r) (void) map))
 
 (: map->alist (hash-map -> (list-of pair)))
 (define (map->alist map)