File: munch.awk

package info (click to toggle)
glibc-pre2.1 2.0.93-980414-1
  • links: PTS
  • area: main
  • in suites: hamm
  • size: 43,920 kB
  • ctags: 42,602
  • sloc: ansic: 325,848; asm: 23,534; makefile: 3,352; sh: 3,283; awk: 582; perl: 474; csh: 15; sed: 10
file content (11 lines) | stat: -rw-r--r-- 394 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
 
BEGIN { special = 0 }

/EXTERNS/ { ndirs = split(subdirs, dirs)
	    for (i = 1; i <= ndirs; ++i)
	    	printf "extern void __init_%s __P ((int argc, char **argv, char **envp));\n", dirs[i]
	    special = 1 }
/CALLS/ { ndirs = split(subdirs, dirs)
	  for (i = 1; i <= ndirs; ++i) printf "  __init_%s (argc, argv, envp);\n", dirs[i]
	  special = 1 }

{ if (special == 0) print $0; special = 0 }