gosh> (define ht (hash-table 'eqv? '(a . 1) '(b . 2) '(c . 3))) ht gosh> (hash-table-for-each ht (lambda (k _) (hash-table-delete! ht k))) #<undef> gosh> (hash-table-for-each ht (lambda (k v) (format #t "~s&~s\n" k v))) a&1 #<undef>
The permalink for this message is: