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