suzanne.soy/whalesong
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

sketching out prototype for web-world

Browse Source
This commit is contained in:
Danny Yoo 2011-08-22 14:53:11 -04:00
parent 30ea1aab1f
commit 225ea42d0c
4 changed files with 16 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
web-world.rkt Normal file
View File

@ -0,0 +1,3 @@
#lang s-exp "lang/base.rkt"
(require "web-world/main.rkt")
(provide (all-from-out "web-world/main.rkt"))

8
web-world/examples/hello/hello.rkt Normal file
View File

@ -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))

4
web-world/examples/hello/index.html Normal file
View File

@ -0,0 +1,4 @@
<html>
<head><title>Hello world</title></head>
<body><h1>Hello world</h1></body>
</html>

1
web-world/main.rkt Normal file
View File

@ -0,0 +1 @@
#lang s-exp "../lang/base.rkt"