Add prototypes to make perl 5.8 happy and quiet!

fdbb105c · Leigh B. Stoller · 4982b9cd · fdbb105c
Commit fdbb105c authored Feb 16, 2006 by Leigh B. Stoller
Hide whitespace changes
Inline Side-by-side

Showing with 5 additions and 3 deletions

tbsetup/swapexp.in tbsetup/swapexp.in +5 -3

No files found.
--- a/tbsetup/swapexp.in
+++ b/tbsetup/swapexp.in
@@ -32,9 +32,6 @@ sub usage()
 	  "<nsfile> - Optional NS file to parse for experiment modify\n");
    exit(-1);
 }
-
-sub fatal($);
-
 my  $optlist = "biafres:wq";

 #
@@ -118,6 +115,11 @@ my $nextswapstate;
 my $termswapstate;
 my $isadmin  = 0;

+# Protos
+sub fatal($);
+sub CheckFWinfo($);
+sub GatherFWinfo();
+		
 #
 # Untaint the path
 #