src/Doc/Isar_Ref/document/showsymbols
author wenzelm
Fri, 23 Jun 2017 14:38:32 +0200
changeset 66176 b51a40281016
parent 63676 88727334666e
child 67146 909dcdec2122
permissions -rwxr-xr-x
tuned signature;

#!/usr/bin/env perl

print "\\begin{supertabular}{ll\@{\\qquad}ll}\n";

$eol = "&";

while (<ARGV>) {
    if (m/^\\newcommand\{\\(isasym|isactrl)([A-Za-z]+)\}/) {
        if ($1 eq "isasym") {
            print "\\verb,\\<$2>, & {\\isasym$2} $eol\n";
        }
        else {
            print "\\verb,\\<^$2>, & {\\isactrl$2} $eol\n";
        }
        if ("$eol" eq "&") {
            $eol = "\\\\";
        } else {
            $eol = "&";
        }
    }
}

if ("$eol" eq "\\\\") {
    print "$eol\n";
}

print "\\end{supertabular}\n";