diff --git a/scheme/httpd/surflets/packages.scm b/scheme/httpd/surflets/packages.scm index fb6551a..1992df6 100644 --- a/scheme/httpd/surflets/packages.scm +++ b/scheme/httpd/surflets/packages.scm @@ -81,6 +81,9 @@ random ;not quite random locks thread-cells + profiling + httpd-logging + shift-reset scsh scheme ) @@ -93,3 +96,59 @@ (define-interface plugin-interface (export main)) + +(define-interface shift-reset-interface + (export (reset :syntax) + (shift :syntax))) + +(define-structure shift-reset shift-reset-interface + (open scheme + signals + escapes + thread-cells) + (files shift-reset)) + +(define-interface profiling-interface + (export profile-space + profile-result + profile-results + write-gnuplot-data-file + + space-info-pair space-info-symbol + space-info-vector space-info-closure + space-info-location space-info-cell + space-info-channel space-info-port + space-info-ratnum space-info-record + space-info-continuation space-info-extended-number + space-info-template space-info-weak-pointer + space-info-shared-binding space-info-unused-d-header1 + space-info-unused-d-header2 space-info-string + space-info-byte-vector space-info-double + space-info-bignum space-info-total + + set-space-info-pair! set-space-info-symbol! + set-space-info-vector! set-space-info-closure! + set-space-info-location! set-space-info-cell! + set-space-info-channel! set-space-info-port! + set-space-info-ratnum! set-space-info-record! + set-space-info-continuation! set-space-info-extended-number! + set-space-info-template! set-space-info-weak-pointer! + set-space-info-shared-binding! set-space-info-unused-d-header1! + set-space-info-unused-d-header2! set-space-info-string! + set-space-info-byte-vector! set-space-info-double! + set-space-info-bignum! set-space-info-total! + + pure-count pure-bytes + impure-count impure-bytes + total-count total-bytes + )) + +(define-structure profiling profiling-interface + (open let-opt + define-record-types + spatial + srfi-13 + srfi-1 + scsh + scheme) + (files profile)) \ No newline at end of file