* stmt.c (expand_anon_union_decl): When any of the elements of the
[official-gcc.git] / contrib / index-prop
bloba169b5726440b572d9a038635a63d3e705759cf1
1 #! /usr/bin/perl -wi
2 # Fix up the output of cvs diff -c so that it works with patch.
3 # We do this by propagating the full pathname from the Index: line
4 # into the diff itself.
6 # Thrown together by Jason Merrill <jason@cygnus.com>
8 while (<>)
10 if (/^Index: (.*)/)
12 $full = $1;
13 print;
14 for (1..7)
16 $_ = <>;
17 s/ [^\t]+\t/ $full\t/;
18 print;
21 else
23 print;