6450ac10eb5280b300d46b8aba49b5f1f5e32d77
[kopensolaris-gnu/glibc.git] / manual / xtract-typefun.awk
1 #! /usr/local/bin/gawk -f
2 BEGIN {
3   last_node="";
4 }
5
6 /^@node/ {
7   last_node = gensub (/@node +([^@,]+).*/, "\\1", 1);
8 }
9
10 /^@deftypefun/ {
11   printf ("* %s: (libc)%s.\n",
12           gensub (/@deftypefun +([^{ ]+|\{[^}]+\}) +([[:alpha:]_][[:alnum:]_]+).*/, "\\2", 1),
13     last_node);
14 }
15
16 /^@deftypevr/ {
17   printf ("* %s: (libc)%s.\n",
18           gensub (/@deftypevr +([^{ ]+|\{[^}]+\}) +([^{ ]+|\{[^}]+\}) +([[:alpha:]_][[:alnum:]_]+).*/, "\\3", 1),
19     last_node);
20 }
21
22 /^@deftypefn/ {
23   printf ("* %s: (libc)%s.\n",
24           gensub (/@deftypefn +([^{ ]+|\{[^}]+\}) +[^{ ]*(\{[^}]+\})? +([[:alpha:]_][[:alnum:]_]+).*/, "\\3", 1),
25     last_node);
26 }