Keith Owens wrote:
scripts/reference*.pl - treat built-in.o as conglomerate. Ignore
references from altinstructions to init text/data.
Signed-off-by: Keith Owens <kaos@ocs.com.au>
+ if ($comment =~ /GCC\:.*GCC\:/m || $object =~ /built-in.\o/) {
s|built-in.\o|built-in\.o|
Corrected patch is attached.
---
scripts/reference*.pl - treat built-in.o as conglomerate. Ignore
references from altinstructions to init text/data.
Signed-off-by: Keith Owens <kaos@ocs.com.au>
Index: 2.6.10/scripts/reference_discarded.pl
===================================================================
--- 2.6.10.orig/scripts/reference_discarded.pl 2004-10-19 07:54:07.000000000 +1000
+++ 2.6.10/scripts/reference_discarded.pl 2005-01-16 17:13:03.997955187 +1100
@@ -62,7 +62,7 @@ foreach $object (keys(%object)) {
$l = read(OBJECT, $comment, $size);
die "read $size bytes from $object .comment failed" if ($l != $size);
close(OBJECT);
- if ($comment =~ /GCC\:.*GCC\:/m) {
+ if ($comment =~ /GCC\:.*GCC\:/m || $object =~ /built-in\.o/) {
++$ignore;
delete($object{$object});
}
Index: 2.6.10/scripts/reference_init.pl
===================================================================
--- 2.6.10.orig/scripts/reference_init.pl 2004-12-25 10:26:19.000000000 +1100
+++ 2.6.10/scripts/reference_init.pl 2005-01-16 17:12:50.449024044 +1100
@@ -70,7 +70,7 @@ foreach $object (keys(%object)) {
$l = read(OBJECT, $comment, $size);
die "read $size bytes from $object .comment failed" if ($l != $size);
close(OBJECT);
- if ($comment =~ /GCC\:.*GCC\:/m) {
+ if ($comment =~ /GCC\:.*GCC\:/m || $object =~ /built-in\.o/) {
++$ignore;
delete($object{$object});
}
@@ -96,6 +96,7 @@ foreach $object (sort(keys(%object))) {
$from !~ /\.pci_fixup_header$/ &&
$from !~ /\.pci_fixup_final$/ &&
$from !~ /\__param$/ &&
+ $from !~ /\.altinstructions/ &&
$from !~ /\.debug_/)) {
printf("Error: %s %s refers to %s\n", $object, $from, $line);
}
---
