my $lang
my @SPEC
my %DATA
sub splice_subtypes
sub prolog_scheme
sub gen_scheme
sub prolog_js
sub gen_js
sub epilog_js
sub gen
sub gen_all