extra/websites/factorcode/factorcode.factor

   1 ! Copyright (c) 2010 Slava Pestov
   2 ! See https://factorcode.org/license.txt for BSD license.
   3 USING: accessors http.server http.server.dispatchers
   4 http.server.static kernel namespaces sequences ;
   5 IN: websites.factorcode
   6
   7 : <factor-website> ( -- website )
   8     <dispatcher>
   9         "resource:extra/websites/factorcode/" <static> enable-fhtml >>default ;
  10
  11 : init-testing ( -- )
  12     <factor-website> main-responder set-global ;