File: texis.awk

package info (click to toggle)
glibc-doc-reference 2.28-1
  • links: PTS, VCS
  • area: non-free
  • in suites: buster
  • size: 4,396 kB
  • sloc: ansic: 1,545; perl: 409; sh: 267; makefile: 161; awk: 94
file content (21 lines) | stat: -rw-r--r-- 316 bytes parent folder | download | duplicates (9) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
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 "";
}