Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

sketching out prototype for web-world

  • Loading branch information...
commit 225ea42d0c84baae4b17012fc0efad4abf03739f 1 parent 30ea1aa
Danny Yoo authored
View
3  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"))
View
8 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))
View
4 web-world/examples/hello/index.html
@@ -0,0 +1,4 @@
+<html>
+<head><title>Hello world</title></head>
+<body><h1>Hello world</h1></body>
+</html>
View
1  web-world/main.rkt
@@ -0,0 +1 @@
+#lang s-exp "../lang/base.rkt"
Please sign in to comment.
Something went wrong with that request. Please try again.