Mercurial > repos > rhope
view basicweb.rhope @ 78:4d5ea487f810
Working String implementation and some basic (but nowhere near exhaustive) tests
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Thu, 08 Jul 2010 21:55:47 -0400 |
parents | 6202b866d72c |
children | 1f39e69446f9 |
line wrap: on
line source
/* Uses the webserver library to serve static files from the current directory */ //Import the library that does all the hard work Import webserver.rhope Main[] { Print["Starting webserver"] //Since we're just serving static files we don't need to setup any handlers handlers <- Dictionary[] //Start listening on port 80 Listen on Port[80,["Connection Start"]Set Input[1, handlers]] Wait Forever[] }