hyperlink #<void> and #<undefined> in docs

original commit: 0101d12d49ce61bc3877ad4db4f0fb2f3f835bfb
This commit is contained in:
Matthew Flatt 2011-03-12 07:27:58 -07:00
parent f258bf0dff
commit b1748ad2c3

View File

@ -171,10 +171,18 @@
(list (racketmodfont "#lang"))
`(part ,(doc-prefix '(lib "scribblings/guide/guide.scrbl") "hash-lang"))))
(define (make-v+u-link p)
(make-link-element
module-link-color
p
`(part ,(doc-prefix '(lib "scribblings/guide/guide.scrbl") "void+undefined"))))
(define-on-demand void-const
(racketresultfont "#<void>"))
(make-v+u-link
(racketresultfont "#<void>")))
(define-on-demand undefined-const
(racketresultfont "#<undefined>"))
(make-v+u-link
(racketresultfont "#<undefined>")))
(define (link url
#:underline? [underline? #t]