From 9930b0b0650ae3e38c033c28672398425dd8228c Mon Sep 17 00:00:00 2001
From: Andrew Tridgell <tridge@samba.org>
Date: Mon, 1 Jul 2002 09:12:41 +0000
Subject: used findstatic.pl to make some variables static and remove some dead
 code (This used to be commit 91ad9041e9507d36eb3f40c23c5d4df61f139ef0)

---
 source3/script/findstatic.pl | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'source3/script/findstatic.pl')

diff --git a/source3/script/findstatic.pl b/source3/script/findstatic.pl
index d2d1b4d924..43a4916435 100755
--- a/source3/script/findstatic.pl
+++ b/source3/script/findstatic.pl
@@ -45,6 +45,7 @@ for (my($i)=0; $i <= $#{@lines}; $i++) {
 # are defined
 foreach my $f (keys %def) {
 	print "Checking $f\n";
+	my($found_one) = 0;
 	foreach my $s (@{$def{$f}}) {
 		my($found) = 0;
 		foreach my $f2 (keys %undef) {
@@ -52,6 +53,7 @@ foreach my $f (keys %def) {
 				foreach my $s2 (@{$undef{$f2}}) {
 					if ($s2 eq $s) {
 						$found = 1;
+						$found_one = 1;
 					}
 				}
 			}
@@ -61,5 +63,8 @@ foreach my $f (keys %def) {
 			print "  '$s' is unique to $f  ($t)\n";
 		}
 	}
+	if ($found_one == 0) {
+		print "  all symbols in '$f' are unused (main program?)\n";
+	}
 }
 
-- 
cgit