mcst-linux-kernel/glibc-2.35/manual/texis.awk

22 lines
316 B
Awk
Raw Permalink Normal View History

2024-07-09 13:51:45 +03:00
BEGIN {
print "texis = \\";
for(x = 1; x < ARGC; x++)
{
input[0] = ARGV[x];
print ARGV[x], "\\";
for (s = 0; s >= 0; s--)
{
while ((getline < input[s]) > 0)
{
if ($1 == "@include")
{
input[++s] = $2;
print $2, "\\";
}
}
close(input[s]);
}
}
print "";
}