mirror of
https://sourceware.org/git/glibc.git
synced 2024-11-22 13:00:06 +00:00
12 lines
388 B
Awk
12 lines
388 B
Awk
|
BEGIN { special = 0 }
|
||
|
|
|
||
|
|
/EXTERNS/ { ndirs = split(subdirs, dirs)
|
||
|
|
for (i = 1; i <= ndirs; ++i)
|
||
|
|
printf "extern void __init_%s (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 }
|