comparison contrib/filter_params.pl @ 0:a06113de4d67

first commit
author kent <kent@cr.ie.u-ryukyu.ac.jp>
date Fri, 17 Jul 2009 14:47:48 +0900
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:a06113de4d67
1 #!/usr/bin/perl
2
3 # Filters out some of the #defines used throughout the GCC sources:
4 # - GTY(()) marks declarations for gengtype.c
5 # - PARAMS(()) is used for K&R compatibility. See ansidecl.h.
6
7 while (<>) {
8 s/^\/\* /\/\*\* \@verbatim /;
9 s/\*\// \@endverbatim \*\//;
10 s/GTY[ \t]*\(\(.*\)\)//g;
11 s/[ \t]ATTRIBUTE_UNUSED//g;
12 s/PARAMS[ \t]*\(\((.*?)\)\)/\($1\)/sg;
13 print;
14 }