[thirdparty/gcc.git] / contrib / filter_params.pl

#!/usr/bin/perl

# Filters out some of the #defines used throughout the GCC sources:
# - GTY(()) marks declarations for gengtype.c
# - PARAMS(()) is used for K&R compatibility. See ansidecl.h.

while (<>) {
    s/^\/\* /\/\*\* \@verbatim /;
    s/\*\// \@endverbatim \*\//;
    s/GTY[ \t]*\(\(.*\)\)//g;
    s/[ \t]ATTRIBUTE_UNUSED//g;
    s/PARAMS[ \t]*\(\((.*?)\)\)/\($1\)/sg;
    print;
}
Commit	Line	Data
6de9cd9a DN	1	#!/usr/bin/perl
6de9cd9a DN	2
d0e71b9c	3	# Filters out some of the #defines used throughout the GCC sources:
6de9cd9a DN	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	}