Revision: | 1.1 |
Committed: | Mon Nov 24 17:28:08 2003 UTC (20 years, 7 months ago) by pcg |
Branch: | MAIN |
CVS Tags: | rel-2_1_0, rel-4_8, rel-5_0, rel-4_4, rel-4_6, rel-4_7, rel-4_0, rel-4_1, rel-4_2, rel-4_3, rel-3_7, rel-3_6, rel-3_5, rel-3_4, rel-3_3, rel-3_2, rel-2_8, rel-3_0, rel-2_7, rel-2_4, rel-2_5, rel-2_2, rel-2_3, rel-2_0, rel-3_8, rel-1-9, stable, rel-1-3, rel-1-2, rxvt-2-0, rel-1_9, before_astyle, after_astyle, rel-5_1, rel-4_9 |
Log Message: | *** empty log message *** |
# | User | Rev | Content |
---|---|---|---|
1 | pcg | 1.1 | /^\/\* INTPROTO \*\/$/ { |
2 | getline # function return | ||
3 | printf "%-16s ", $0 | ||
4 | cline="" | ||
5 | while (index(cline, "{") == 0 && index(cline, "#") == 0) { | ||
6 | getline # function name and args | ||
7 | cline=cline $0 | ||
8 | } | ||
9 | gsub(/[\t\n]/, " ", cline) | ||
10 | gsub(/[ ]+/, " ", cline) | ||
11 | l = index(cline, "(") | ||
12 | m = index(cline, "{") | ||
13 | n = index(cline, "#") | ||
14 | if (n > 0) { m = n } | ||
15 | outstring = sprintf("%%-32.%ds __PROTO(", l - 1) | ||
16 | printf outstring, cline | ||
17 | reststring = substr(cline, l, m - l) | ||
18 | printf reststring | ||
19 | print ");" | ||
20 | } |