swh:1:snp:60d230fd23a15f9241785ee90478bf9722d99dac
Raw File
Tip revision: 8d3d27cd17bbceab18c317820dbe595178f6312a authored by fangy14 on 06 November 2019, 07:20:57 UTC
open source
Tip revision: 8d3d27c
gen-instantiations.pl
#!/usr/bin/perl -w
my %func=();
my %class=();

while(<>)
{
    if(!/undefined reference to \`(.*)\'/){next}
    $_=$1;
    s/ZIRAN:://g;
    s/, /,/g;
    s/std::__cxx11::basic_string<char,std::char_traits<char>,std::allocator<char> >/std::string/g;
    $func{$_}=1;
    s/::.*//;
    $class{$_}=1;
}

for(sort keys %class)
{
    print "template class $_;\n";
}

print "\n------------------------------------------------------------------\n";

for(sort keys %func)
{
    print "template $_;\n";
}
back to top