From 8b1df485871140be383ade7a6669fcc3c77223c6 Mon Sep 17 00:00:00 2001
From: Jon Rafkind <rafkind@racket-lang.org>
Date: Thu, 23 Oct 2008 22:11:41 +0000
Subject: [PATCH] add example for write

svn: r12106
---
 collects/scribblings/reference/write.scrbl | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/collects/scribblings/reference/write.scrbl b/collects/scribblings/reference/write.scrbl
index 97a8f82693..20f1cc2ca5 100644
--- a/collects/scribblings/reference/write.scrbl
+++ b/collects/scribblings/reference/write.scrbl
@@ -18,7 +18,15 @@ handler is called. Otherwise, the default printer is used (in
 See @secref["printing"] for more information about the default
 printer. In particular, note that @scheme[write] may require memory
 proportional to the depth of the value being printed, due to the
-initial cycle check.}
+initial cycle check.
+
+@examples[
+(write 'hi)
+(write (lambda (n) n))
+(define o (open-output-string))
+(write "hello" o)
+(get-output-string o)
+]}
 
 @defproc[(display [datum any/c][out output-port? (current-output-port)])
          void?]{