7 lines
133 B
Scheme
7 lines
133 B
Scheme
#lang scheme
|
|
(require "xml-sig.ss"
|
|
"xml-unit.ss")
|
|
|
|
(define-values/invoke-unit/infer xml@)
|
|
|
|
(provide-signature-elements xml^) |