From 74c39aad9957ce059c0e12c335de05678e008c7e Mon Sep 17 00:00:00 2001 From: Sam Tobin-Hochstadt Date: Tue, 14 May 2013 11:38:09 -0400 Subject: [PATCH] Use submodules instead of marking tricks for identifiers in docs. original commit: 64df4cef13c1a43ff77f349595432d511aa20fcd --- .../scribblings/reference/special-forms.scrbl | 34 ++++++++----------- 1 file changed, 15 insertions(+), 19 deletions(-) diff --git a/collects/typed-racket/scribblings/reference/special-forms.scrbl b/collects/typed-racket/scribblings/reference/special-forms.scrbl index 8dbd8f95..94960422 100644 --- a/collects/typed-racket/scribblings/reference/special-forms.scrbl +++ b/collects/typed-racket/scribblings/reference/special-forms.scrbl @@ -13,26 +13,22 @@ (examples #:eval the-top-eval . args)) -@(define-syntax-rule (def-racket for-id for*-id with-handlers-id - default-continuation-prompt-tag-id - mod-beg-id lambda-id λ-id define-id) - (begin - (require (for-label (only-in racket/base for for* with-handlers - default-continuation-prompt-tag - #%module-begin lambda λ define))) - (define for-id (racket for)) - (define for*-id (racket for*)) - (define mod-beg-id (racket #%module-begin)) - (define with-handlers-id (racket with-handlers)) - (define default-continuation-prompt-tag-id - (racket default-continuation-prompt-tag)) - (define lambda-id (racket lambda)) - (define λ-id (racket λ)) - (define define-id (racket define)))) -@(def-racket for-id for*-id with-handlers-id - default-continuation-prompt-tag-id - mod-beg-id lambda-id λ-id define-id) +@(module def-racket racket/base + (require (for-label racket/base) scribble/manual) + (define for-id (racket for)) + (define for*-id (racket for*)) + (define mod-beg-id (racket #%module-begin)) + (define with-handlers-id (racket with-handlers)) + (define default-continuation-prompt-tag-id + (racket default-continuation-prompt-tag)) + (define lambda-id (racket lambda)) + (define λ-id (racket λ)) + (define define-id (racket define)) + + (provide (all-defined-out))) + +@(require 'def-racket) @title[#:tag "special-forms"]{Special Form Reference}