Counter fix
parent
cdc39718fd
commit
011726f863
|
@ -27,8 +27,7 @@ M: counter-app init-session* drop 0 count sset ;
|
||||||
counter-app new-dispatcher
|
counter-app new-dispatcher
|
||||||
[ 1+ ] <counter-action> "inc" add-responder
|
[ 1+ ] <counter-action> "inc" add-responder
|
||||||
[ 1- ] <counter-action> "dec" add-responder
|
[ 1- ] <counter-action> "dec" add-responder
|
||||||
<display-action> "" add-responder
|
<display-action> "" add-responder ;
|
||||||
<sessions> ;
|
|
||||||
|
|
||||||
! Deployment example
|
! Deployment example
|
||||||
USING: db.sqlite furnace.alloy namespaces ;
|
USING: db.sqlite furnace.alloy namespaces ;
|
||||||
|
|
Loading…
Reference in New Issue