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
7while (<>) {
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}
15