Mercurial > repos > rhope
view basicweb.rhope @ 150:50c97b448f44
Add Previous method to List
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Wed, 24 Nov 2010 02:28:01 +0000 |
parents | f3686f60985d |
children |
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[args] { [args]Index[1] { port <- Int32[~] } { port <- Val[80] } Print["Starting webserver"] //Since we're just serving static files we don't need to setup any handlers handlers <- Dictionary[] //Start listening on the desired port Listen on Port[port,Connection Start[?, ?, handlers]] { Wait Forever[] } }