sunet/program-modules.scm

49 lines
1.3 KiB
Scheme

;;; 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!?
;;
;;; (define-structure scheme-programs-package (export testprog
;;; info2www)
;;; (open scsh ; syscalls & INDEX
;;; condhax ; WHEN, ? for COND
;;; switch-syntax ; Conditionals
;;; defrec-package ; Records
;;; htmlout-package ; Formatted HTML output
;;; httpd-core ; REQUEST record type, HTTP-ERROR & reply codes
;;; ; version stuff
;;; uri-package ; UNESCAPE-URI
;;; error-package ; ERROR
;;; pp ; Pretty-printer
;;; strings rfc822
;;; toothless-eval ; EVAL-SAFELY
;;; handle ; IGNORE-ERROR
;;; strings ; SKIP-WHITESPACE
;;; parse-html-forms ; PARSE-HTML-FORM-QUERY
;;; scheme)
;;; (files testprog
;;; info2www))