suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Documenting make-hasheqv and using it

Browse Source
This commit is contained in:
Jay McCarthy 2010-05-27 12:19:58 -06:00
parent 035ee93911
commit 7e485b8d28
2 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/compiler/zo-parse.rkt
View File

@ -794,9 +794,8 @@
[len (read-compact-number cp)]) [len (read-compact-number cp)])
((case eq ((case eq
[(0) make-hasheq-placeholder] [(0) make-hasheq-placeholder]
; XXX One of these should be eqv
[(1) make-hash-placeholder] [(1) make-hash-placeholder]
[(2) make-hash-placeholder]) [(2) make-hasheqv-placeholder])
(for/list ([i (in-range len)]) (for/list ([i (in-range len)])
(cons (read-compact cp) (cons (read-compact cp)
(read-compact cp)))))] (read-compact cp)))))]

6
collects/scribblings/reference/pairs.scrbl
View File

@ -1051,3 +1051,9 @@ for use with @scheme[make-reader-graph].}
Like @scheme[make-immutable-hasheq], but produces a table placeholder Like @scheme[make-immutable-hasheq], but produces a table placeholder
for use with @scheme[make-reader-graph].} for use with @scheme[make-reader-graph].}
@defproc[(make-hasheqv-placeholder [assocs (listof pair?)])
hash-placeholder?]{
Like @scheme[make-immutable-hasheqv], but produces a table placeholder
for use with @scheme[make-reader-graph].}