From 225ea42d0c84baae4b17012fc0efad4abf03739f Mon Sep 17 00:00:00 2001 From: Danny Yoo Date: Mon, 22 Aug 2011 14:53:11 -0400 Subject: [PATCH] sketching out prototype for web-world --- web-world.rkt | 3 +++ web-world/examples/hello/hello.rkt | 8 ++++++++ web-world/examples/hello/index.html | 4 ++++ web-world/main.rkt | 1 + 4 files changed, 16 insertions(+) create mode 100644 web-world.rkt create mode 100644 web-world/examples/hello/hello.rkt create mode 100644 web-world/examples/hello/index.html create mode 100644 web-world/main.rkt diff --git a/web-world.rkt b/web-world.rkt new file mode 100644 index 0000000..97a2bca --- /dev/null +++ b/web-world.rkt @@ -0,0 +1,3 @@ +#lang s-exp "lang/base.rkt" +(require "web-world/main.rkt") +(provide (all-from-out "web-world/main.rkt")) diff --git a/web-world/examples/hello/hello.rkt b/web-world/examples/hello/hello.rkt new file mode 100644 index 0000000..efb3c88 --- /dev/null +++ b/web-world/examples/hello/hello.rkt @@ -0,0 +1,8 @@ +#lang planet dyoo/whalesong +(require (planet dyoo/whalesong/web-world) + (planet dyoo/whalesong/resource)) + +(define-resource index.html "index.html") + +(big-bang "don't care" + (initial-view index.html)) diff --git a/web-world/examples/hello/index.html b/web-world/examples/hello/index.html new file mode 100644 index 0000000..3d4ee39 --- /dev/null +++ b/web-world/examples/hello/index.html @@ -0,0 +1,4 @@ + +Hello world +

Hello world

+ diff --git a/web-world/main.rkt b/web-world/main.rkt new file mode 100644 index 0000000..4d0c7c4 --- /dev/null +++ b/web-world/main.rkt @@ -0,0 +1 @@ +#lang s-exp "../lang/base.rkt"