diff --git a/racketcon/Makefile b/racketcon/Makefile
new file mode 100644
index 0000000..eb9277d
--- /dev/null
+++ b/racketcon/Makefile
@@ -0,0 +1,5 @@
+#!/bin/sh
+
+all:
+ ../whalesong get-javascript --verbose fact.rkt > fact.js
+ ../whalesong get-runtime --verbose > runtime.js
diff --git a/racketcon/fact.html b/racketcon/fact.html
new file mode 100644
index 0000000..9e9559f
--- /dev/null
+++ b/racketcon/fact.html
@@ -0,0 +1,32 @@
+
+
+
+
+
+
+
+
+
+
+The factorial of 10000 is being computed.
+
+
diff --git a/racketcon/fact.rkt b/racketcon/fact.rkt
new file mode 100644
index 0000000..daa6c20
--- /dev/null
+++ b/racketcon/fact.rkt
@@ -0,0 +1,11 @@
+#lang planet dyoo/whalesong
+(provide fact)
+(define (fact x)
+ (cond
+ [(= x 0)
+ 1]
+ [else
+ (* x (fact (sub1 x)))]))
+
+
+;;(printf "test: ~s\n" (fact 4))
\ No newline at end of file
diff --git a/racketcon/racket-days-abstract.txt b/racketcon/racket-days-abstract.txt
new file mode 100644
index 0000000..b554f3e
--- /dev/null
+++ b/racketcon/racket-days-abstract.txt
@@ -0,0 +1,58 @@
+What's Whalesong? It's a Racket to JavaScript compiler. Whalesong
+will be used to support World programming for the web. It will be the
+evaluator for the upcoming versions of Moby Scheme, as well as
+WeScheme.
+
+
+We can support simple animations, as you'd expect:
+
+(Show a world program: the falling rain drops program.)
+
+
+We can do programs that have interactivity, such as:
+
+(Show another world program: pacman.)
+
+
+A core idea behind Whalesong is to reuse Racket's infrastructure as
+much as possible. I'm not a compiler person, so I cheat, by
+piggibacking on Matthew's work. Whalesong reuses the bytecode
+compiler, and translates the bytecode to JavaScript.
+
+I really am reusing the linguistic features of Racket. For example,
+let's look at the less-than-impressive program output below.
+
+(Show the hello world program)
+
+
+This is trivial, right? Let's look at the source code.
+
+(Reveal that the program was written in BF)
+
+
+Yes, this is unholy, but it works. We really are using Racket's
+underlying language features to handle reading, macro expansion, and
+optimization.
+
+
+
+Because we're on the web, we may even want to use functions that we've
+written in Racket as a part of regular web pages. Whalesong lets us
+do this.
+
+(Show the factorial example, and how it can be used by external
+JavaScript on a web page.)
+
+
+
+There's quite a bit that's missing: we don't yet have all of the
+primitives necessary to compile racket/base, so all Whalesong programs
+currently have to be in a language that ultimately bottoms to (planet
+dyoo/whalesong/lang/base).
+
+I'm going to get a release out in the following month, and the new
+versions of Moby Scheme for Smartphones, as well as the WeScheme
+environment, will be using the underlying evaluator of Whalesong.
+
+
+If you're interested, please talk to me during the break. Thanks!
diff --git a/racketcon/talk.rkt b/racketcon/talk.rkt
index f951194..2192eb3 100644
--- a/racketcon/talk.rkt
+++ b/racketcon/talk.rkt
@@ -15,11 +15,15 @@
(above
(text "Whalesong:" 100 "black")
(text "a Racket to JavaScript Compiler" 80 "black")
- (image-url "file:///home/dyoo/work/whalesong/racketcon/plt-logo.png"))
+ (scale 2 (image-url "file:///home/dyoo/work/whalesong/racketcon/plt-logo.png"))
+ (square 20 "solid" "white")
+ (text "Danny Yoo (dyoo@hashcollision.org)" 50 "darkblue"))
"Why Whalesong?"
"World programs on the web"
- "Reusing Racket..."
- "Hello world!"
+ (above (text "Reusing Racket's compiler..." font-size "black")
+ (square 20 "solid" "white")
+ (text "Hello world?" (floor (* font-size 2/3)) "black"))
+ "Web programs can use Racket"
"What's missing?"
"http://hashcollision.org/whalesong"))
@@ -60,7 +64,10 @@
(quotient (image-width bg) 2)
(quotient (image-height bg) 2)
bg)])))
-
+
+(define (tick w)
+ w)
+
(define (my-max x y)
(if (> x y)
@@ -76,4 +83,5 @@
(big-bang 0
(on-key key)
- (to-draw draw))
\ No newline at end of file
+ (on-tick tick)
+ (to-draw draw))