diff --git a/scheme/httpd/surflets/packages.scm b/scheme/httpd/surflets/packages.scm index 1a21b24..912f03e 100644 --- a/scheme/httpd/surflets/packages.scm +++ b/scheme/httpd/surflets/packages.scm @@ -74,6 +74,9 @@ send ;just send (no finish, no suspend) set-servlet-data! get-servlet-data + adjust-timeout ;adjusts timeout of current instance + ;Without `!' because PLT + ;doesn't have it. )) (define-interface servlet-handler/admin-interface @@ -93,6 +96,7 @@ instance-continuation-counter delete-instance! instance-adjust-timeout! + adjust-timeout get-continuations delete-continuation! session-instance-id)) @@ -118,7 +122,6 @@ httpd-logging ;HTTP-SYSLOG shift-reset ;SHIFT and RESET conditions ;exception - defrec-package ;DEFINE-RECORD threads ;SLEEP thread-fluids ;FORK-THREAD sxml-to-html ;SXML->HTML @@ -142,6 +145,8 @@ extract-bindings extract-single-binding + adjust-timeout + make-outdater (if-outdated :syntax) show-outdated @@ -163,7 +168,7 @@ make-image-button input-field-value input-field-binding - + make-address returned-via? make-callback @@ -185,6 +190,8 @@ url httpd-request define-record-types + weak ;MAKE-WEAK-POINTER + locks scsh scheme) (files servlets))