From 4990029922e3e83133eb176d458a1c6eb0b17cf5 Mon Sep 17 00:00:00 2001 From: Carl Eastlund Date: Sat, 30 Apr 2011 18:57:10 -0400 Subject: [PATCH] Added documentation for define-renaming. --- collects/unstable/scribblings/define.scrbl | 16 +++++++++++----- 1 file changed, 11 insertions(+), 5 deletions(-) diff --git a/collects/unstable/scribblings/define.scrbl b/collects/unstable/scribblings/define.scrbl index f4ddd85cda..ad91413306 100644 --- a/collects/unstable/scribblings/define.scrbl +++ b/collects/unstable/scribblings/define.scrbl @@ -70,16 +70,22 @@ y @section{Renaming Definitions} -@defform[(define-renamings [new old] ...)]{ +@deftogether[( +@defform[(define-renaming new old)] +@defform[(define-renamings [new old] ...)] +)]{ -Establishes a rename transformer for each @scheme[new] identifier, -redirecting it to the corresponding @scheme[old] identifier. +Establishes a +@tech[#:doc '(lib "scribblings/reference/reference.scrbl")]{rename transformer} +for each @scheme[new] identifier, redirecting it to the corresponding +@scheme[old] identifier. @defexamples[ #:eval (eval/require 'unstable/define) +(define-renaming use #%app) (define-renamings [def define] [lam lambda]) -(def plus (lam (x y) (+ x y))) -(plus 1 2) +(def plus (lam (x y) (use + x y))) +(use plus 1 2) ] }