cont-responder cleanup

diff --git a/contrib/httpd/cont-responder.factor b/contrib/httpd/cont-responder.factor
index cd4d70093c017888937ed360deb1b1c7cc7185c3..65e7e78f92e67fa73249d4037e1625f9dcddd58c 100644 (file)
--- a/contrib/httpd/cont-responder.factor
+++ b/contrib/httpd/cont-responder.factor
@@ -176,8 +176,8 @@ SYMBOL: callback-cc
             stdio get swap continue-with
         ] callcc1
         nip
-        dup resume-stdio stdio set resume-value
-        call
+        dup resume-stdio stdio set
+        resume-value call
         store-callback-cc stdio get 
     ] callcc1 stdio set ;