10 lines
228 B
Scheme
10 lines
228 B
Scheme
#lang scheme/base
|
|
(require "../struct.ss")
|
|
|
|
(provide (struct-out exporting-libraries)
|
|
current-signature)
|
|
|
|
(define-struct (exporting-libraries element) (libs source-libs))
|
|
|
|
(define current-signature (make-parameter #f))
|