diff --git a/scheme/httpd/seval.scm b/scheme/httpd/seval.scm index 7cf04ee..a3ae9b0 100644 --- a/scheme/httpd/seval.scm +++ b/scheme/httpd/seval.scm @@ -9,14 +9,6 @@ ;;; This is really just an handler example demonstrating how to upload code ;;; into the server. -;;; HTML forms -;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -;;; This request handler is suitable for receiving code entered into an -;;; HTML text form. The Scheme code being uploaded is being POST'd to us -;;; (from a form). See http-forms.scm for info on the format of this kind -;;; of request. After parsing the request into the submitted string, we -;;; parse *that* into a Scheme sexp with READ, and eval it. - ;;; (do/timeout secs thunk) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;; Run THUNK, and gun it down if it hasn't finished in SECS seconds.