1
0
mirror of https://github.com/urlysses/1991.git synced 2024-11-16 01:28:06 -05:00

Move app demo to an examples dir

This commit is contained in:
urlysses 2017-02-15 12:23:28 -05:00
parent 2eef80dd5d
commit a9c21097b8
3 changed files with 14 additions and 10 deletions

10
1991.fs
View File

@ -80,13 +80,3 @@ pubvar public
create-server 0 start-server ;
: /1991 ( "<path> <word>" -- )
bl word ' swap count register-route ;
\ App demo:
: handle-/ s" fff" ;
: handle-hi s" hi!" ;
/1991 / handle-/
/1991 /hi handle-hi
8080 1991:

12
examples/app.fs Normal file
View File

@ -0,0 +1,12 @@
\ App demo:
include ~+/1991.fs
s" ~+/examples/public" set-public-path
: handle-/ s" fff" ;
: handle-hi s" hi!" ;
/1991 / handle-/
/1991 /hi handle-hi
8080 1991:

2
examples/public/some.txt Normal file
View File

@ -0,0 +1,2 @@
some
BODY