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 
original commit: 7e485b8d28
This commit is contained in:
Jay McCarthy 2010-05-27 12:19:58 -06:00
parent 7b264d5089
commit 304e5247ed
1 changed files with 1 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)))))]