comparison basicweb.rhope @ 47:6202b866d72c

Cleaned up constructor names and merged some other changes in to support the Rhope website
author Mike Pavone <pavone@retrodev.com>
date Tue, 22 Dec 2009 01:22:09 -0500
parents 76568becd6d6
children 1f39e69446f9
comparison
equal deleted inserted replaced
46:429b5f441381 47:6202b866d72c
7 7
8 Main[] 8 Main[]
9 { 9 {
10 Print["Starting webserver"] 10 Print["Starting webserver"]
11 //Since we're just serving static files we don't need to setup any handlers 11 //Since we're just serving static files we don't need to setup any handlers
12 handlers <- New@Dictionary[] 12 handlers <- Dictionary[]
13 //Start listening on port 80 13 //Start listening on port 80
14 Listen on Port[80,["Connection Start"]Set Input[1, handlers]] 14 Listen on Port[80,["Connection Start"]Set Input[1, handlers]]
15 Wait Forever[] 15 Wait Forever[]
16 } 16 }