Mercurial > repos > rhope
annotate basicweb.rhope @ 64:e1fd6d244f14
Some progress on updating C backend to work with new C strategy
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Sun, 30 May 2010 17:34:36 -0400 |
parents | 6202b866d72c |
children | 1f39e69446f9 |
rev | line source |
---|---|
0 | 1 /* |
2 Uses the webserver library to serve static files from the current directory | |
3 */ | |
4 | |
5 //Import the library that does all the hard work | |
6 Import webserver.rhope | |
7 | |
8 Main[] | |
9 { | |
10 Print["Starting webserver"] | |
11 //Since we're just serving static files we don't need to setup any handlers | |
47
6202b866d72c
Cleaned up constructor names and merged some other changes in to support the Rhope website
Mike Pavone <pavone@retrodev.com>
parents:
0
diff
changeset
|
12 handlers <- Dictionary[] |
0 | 13 //Start listening on port 80 |
14 Listen on Port[80,["Connection Start"]Set Input[1, handlers]] | |
15 Wait Forever[] | |
16 } |