11 lines
234 B
Racket
11 lines
234 B
Racket
(module language-info racket/base
|
|
|
|
(provide get-info)
|
|
|
|
(define (get-info data)
|
|
(lambda (key default)
|
|
(case key
|
|
[(configure-runtime)
|
|
'(#(scheme/runtime-config configure #f))]
|
|
[else default]))))
|