sunet/scheme/httpd seval.scm

[Viola Brunner <vibr@users.sourceforge.net>]

Update of /cvsroot/sunet/sunet/scheme/httpd
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31447

Modified Files:
      Tag: http-1-1
        seval.scm 
Log Message:
factor out parsing of content-length header value -> GET-CONTENT-LENGTH

generalize parsing of content-length header value to parse all header field
values of the form 1*DIGIT -> GET-NUMERIC-FIELD-VALUE

check for valid content-length header in SEVAL before answering 200

TODO: SEVAL is still buggy for request with invalid _body_