;;; Scheme 48 module definitions for Scheme program execution. 
;;; Gebhard Engelhart.

(define-structure scheme-program-server-package (export scheme-program-handler
						 runprogram)
  (open strings
	rfc822
	crlf-io			; WRITE-CRLF
	uri-package
	url-package		; HTTP-URL record type
	httpd-core		; REQUEST record type, HTTP-ERROR & reply codes
				;   version stuff
	httpd-basic-handlers	; HTTP-HOMEDIR, SERVE-ROOTED-FILE-PATH
	httpd-error           	; HTTP-ERROR
	scsh-utilities		; INDEX
	scsh			; syscalls
	formats			; format
	condhax			; ? is COND
	switch-syntax		; SWITCHQ
	scheme)
  (files (httpd scheme-program-server)))

;;; package to load scheme programs

;;
;; source files are missing!?
;;

;;; cheme-programs-package (export testprog
;;;      			  info2www)
;;;      ; syscalls & INDEX
;;;      ; WHEN, ? for COND
;;; ax	; Conditionals
;;; age  ; Records
;;; kage	; Formatted HTML output
;;;      ; REQUEST record type, HTTP-ERROR & reply codes
;;;      ; version stuff
;;; 	; UNESCAPE-URI
;;; ge	; ERROR
;;;      ; Pretty-printer
;;; 822
;;; val	; EVAL-SAFELY
;;;      ; IGNORE-ERROR
;;;      ; SKIP-WHITESPACE
;;; forms ; PARSE-HTML-FORM-QUERY
;;; 
;;; 
;;;