From 187eb268fb9a6c79b05810aca2473b507eb5d11d Mon Sep 17 00:00:00 2001
From: Danny Yoo <dyoo@cs.wpi.edu>
Date: Mon, 29 Aug 2011 15:51:39 -0400
Subject: [PATCH] docs

---
 base/reader/reader.rkt | 9 +++++++++
 lang/whalesong.rkt     | 4 ++++
 scribblings/cs19.scrbl | 4 ++--
 3 files changed, 15 insertions(+), 2 deletions(-)
 create mode 100644 base/reader/reader.rkt
 create mode 100644 lang/whalesong.rkt

diff --git a/base/reader/reader.rkt b/base/reader/reader.rkt
new file mode 100644
index 0000000..82f1021
--- /dev/null
+++ b/base/reader/reader.rkt
@@ -0,0 +1,9 @@
+#lang s-exp syntax/module-reader
+
+;; http://docs.racket-lang.org/planet/hash-lang-planet.html
+
+#:language (lambda (ip)
+	    `(file ,(path->string base-lang-path)))
+
+(require racket/runtime-path)
+(define-runtime-path base-lang-path "../lang/base.rkt")
diff --git a/lang/whalesong.rkt b/lang/whalesong.rkt
new file mode 100644
index 0000000..0be3df9
--- /dev/null
+++ b/lang/whalesong.rkt
@@ -0,0 +1,4 @@
+#lang s-exp "kernel.rkt"
+
+(require "base.rkt")
+(provide (all-from-out "base.rkt"))
\ No newline at end of file
diff --git a/scribblings/cs19.scrbl b/scribblings/cs19.scrbl
index f8665ae..99205fd 100644
--- a/scribblings/cs19.scrbl
+++ b/scribblings/cs19.scrbl
@@ -168,7 +168,7 @@ Several things are happening here.
 @item{We @racket[require] a few libraries to get us some additional
 behavior; in particular, @racketmodname/this-package[web-world] to let
 us write event-driven web-based programs, and @racketmodname/this-package[resource]
-to give us access to external resources.}
+to give us access to external @tech{resource}s.}
 
 @item{We use @racket[define-resource] to refer to external files, like @filepath{index.html} that
 we'd like to include in our program.}
@@ -209,7 +209,7 @@ provides additional information about the event that triggered the callback.
 Start a big bang computation.
 }
 @defproc[(initial-view [x any]) big-bang-handler]{
-Provide an initial view for the big-bang.  Normally, @racket[x] will be a resource
+Provide an initial view for the big-bang.  Normally, @racket[x] will be a @tech{resource}
 to a web page.
 @codeblock|{
 ...