| Revision: | 1.1 |
| Committed: | Mon Nov 24 17:28:08 2003 UTC (22 years, 10 months ago) by pcg |
| Branch: | MAIN |
| CVS Tags: | rel-2_1_0, rxvt-2-0, 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-1-9, stable, rel-1-3, rel-1-2, rel-1_9, before_astyle, after_astyle |
| Log Message: | *** empty log message *** |
| # | User | Rev | Content |
|---|---|---|---|
| 1 | pcg | 1.1 | /^\/\* EXTPROTO \*\/$/ { |
| 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 | } |