Make thread cell top type consistent with docs

This commit is contained in:
Asumu Takikawa 2013-11-14 22:21:22 -05:00
parent f8ea4f46ef
commit a440a46cce
2 changed files with 2 additions and 2 deletions

View File

@ -110,7 +110,7 @@
[VectorTop -VectorTop] [VectorTop -VectorTop]
[HashTableTop -HashTop] [HashTableTop -HashTop]
[MPairTop -MPairTop] [MPairTop -MPairTop]
[ThreadCellTop -ThreadCellTop] [Thread-CellTop -Thread-CellTop]
[Prompt-TagTop -Prompt-TagTop] [Prompt-TagTop -Prompt-TagTop]
[Continuation-Mark-KeyTop -Continuation-Mark-KeyTop] [Continuation-Mark-KeyTop -Continuation-Mark-KeyTop]
[Keyword -Keyword] [Keyword -Keyword]

View File

@ -159,7 +159,7 @@
(define/decl -HashTop (make-HashtableTop)) (define/decl -HashTop (make-HashtableTop))
(define/decl -VectorTop (make-VectorTop)) (define/decl -VectorTop (make-VectorTop))
(define/decl -MPairTop (make-MPairTop)) (define/decl -MPairTop (make-MPairTop))
(define/decl -ThreadCellTop (make-ThreadCellTop)) (define/decl -Thread-CellTop (make-ThreadCellTop))
(define/decl -Prompt-TagTop (make-Prompt-TagTop)) (define/decl -Prompt-TagTop (make-Prompt-TagTop))
(define/decl -Continuation-Mark-KeyTop (make-Continuation-Mark-KeyTop)) (define/decl -Continuation-Mark-KeyTop (make-Continuation-Mark-KeyTop))
(define/decl -Port (Un -Output-Port -Input-Port)) (define/decl -Port (Un -Output-Port -Input-Port))