steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix M:: stack effects.

db4
John Benediktsson 2011-10-13 16:44:30 -07:00
parent 4558bf3414
commit 422f427a87
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/furnace/boilerplate/boilerplate.factor
View File

@ -20,7 +20,7 @@ TUPLE: boilerplate < filter-responder template init ;
: wrap-boilerplate? ( response -- ? ) : wrap-boilerplate? ( response -- ? )
{ [ code>> 200 = ] [ content-type>> "text/html" = ] } 1&& ; { [ code>> 200 = ] [ content-type>> "text/html" = ] } 1&& ;
M:: boilerplate call-responder* ( path responder -- ) M:: boilerplate call-responder* ( path responder -- response )
begin-form begin-form
path responder call-next-method path responder call-next-method
responder init>> call( -- ) responder init>> call( -- )