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