blob: 8f064dd8686363d365f494e83fd200cc0fbc2c4b (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
|
(define hash-mapping-dtd
(let ()
(define (prep-dtd-arg proc)
(lambda (dtd . args)
(apply proc args)))
(make-dtd
make-dictionary-index (prep-dtd-arg hashmap)
dictionary?-index (prep-dtd-arg hashmap?)
dict-empty?-index (prep-dtd-arg hashmap-empty?)
dict-contains?-index (prep-dtd-arg hashmap-contains?)
dict-ref-index (prep-dtd-arg hashmap-ref)
dict-ref/default-index (prep-dtd-arg hashmap-ref/default)
dict-set-index (prep-dtd-arg hashmap-set)
dict-set!-index (prep-dtd-arg hashmap-set!)
dict-adjoin-index (prep-dtd-arg hashmap-adjoin)
dict-adjoin!-index (prep-dtd-arg hashmap-adjoin!)
dict-delete-index (prep-dtd-arg hashmap-delete)
dict-delete!-index (prep-dtd-arg hashmap-delete!)
dict-delete-all-index (prep-dtd-arg hashmap-delete-all)
dict-delete-all!-index (prep-dtd-arg hashmap-delete-all!)
dict-replace-index (prep-dtd-arg hashmap-replace)
dict-replace!-index (prep-dtd-arg hashmap-replace!)
dict-intern-index (prep-dtd-arg hashmap-intern)
dict-intern!-index (prep-dtd-arg hashmap-intern!)
dict-update-index (prep-dtd-arg hashmap-update)
dict-update!-index (prep-dtd-arg hashmap-update!)
dict-update/default-index (prep-dtd-arg hashmap-update/default)
dict-update/default!-index (prep-dtd-arg hashmap-update!/default)
dict-pop-index (prep-dtd-arg hashmap-pop)
dict-pop!-index (prep-dtd-arg hashmap-pop!)
dict-filter-index (prep-dtd-arg hashmap-filter)
dict-filter!-index (prep-dtd-arg hashmap-filter!)
dict-remove-index (prep-dtd-arg hashmap-remove)
dict-remove!-index (prep-dtd-arg hashmap-remove!)
dict-search-index (prep-dtd-arg hashmap-search)
dict-search!-index (prep-dtd-arg hashmap-search!)
dict-copy-index (prep-dtd-arg hashmap-copy)
dict-size-index (prep-dtd-arg hashmap-size)
dict-for-each-index (prep-dtd-arg hashmap-for-each)
dict-count-index (prep-dtd-arg hashmap-count)
dict-keys-index (prep-dtd-arg hashmap-keys)
dict-values-index (prep-dtd-arg hashmap-values)
dict-entries-index (prep-dtd-arg hashmap-entries)
dict-fold-index (prep-dtd-arg hashmap-fold)
dict-map->list-index (prep-dtd-arg hashmap-map->list)
dict->alist-index (prep-dtd-arg hashmap->alist)
dict-comparator-index (prep-dtd-arg hashmap-key-comparator))))
|
