4d6d674d9f
- getbindings contains defs for next-outer, create-test-func, getbindings - ddk-handlers containts all the ddk junk - render-test-list-impl contains render-test-list and simple dependencies - render-sigs contains the signatures for all 3 Add define/opt to render-helpers (maybe this should go in etc.ss). General cleanups in ddk-handlers. svn: r1296
24 lines
625 B
Scheme
24 lines
625 B
Scheme
;; This library is used by match.ss
|
|
(module render-test-list mzscheme
|
|
|
|
(provide render-test-list)
|
|
|
|
(require "render-sigs.ss"
|
|
"render-test-list-impl.ss"
|
|
"getbindings.ss"
|
|
"ddk-handlers.ss"
|
|
(lib "unitsig.ss"))
|
|
|
|
(define rtl@
|
|
(compound-unit/sig
|
|
(import)
|
|
(link (RTL : render-test-list^ (render-test-list@ DDK GET))
|
|
(GET : getbindings^ (getbindings@ RTL))
|
|
(DDK : ddk-handlers^ (ddk-handlers@ GET RTL))
|
|
)
|
|
(export (var (RTL render-test-list)))
|
|
))
|
|
|
|
(define-values/invoke-unit/sig render-test-list^ rtl@)
|
|
|
|
) |