From cffa9543012ee0bc2a1d355ed00839b03fe7ae0c Mon Sep 17 00:00:00 2001
From: rsc <rsc>
Date: Tue, 28 Aug 2007 19:25:04 +0000
Subject: nits

---
 runoff | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

(limited to 'runoff')

diff --git a/runoff b/runoff
index 37ca014..8ebaf13 100755
--- a/runoff
+++ b/runoff
@@ -109,15 +109,20 @@ perl -e '
 		if (/^([0-9]+) #define +([A-za-z0-9_]+) +?\(.*/) {
 			print "$1 $2\n"
 		}
-		
 		elsif (/^([0-9]+) #define +([A-Za-z0-9_]+) +([^ ]+)/) {
 			print "$1 $2 $3\n";
 		}
-		
 		elsif (/^([0-9]+) #define +([A-Za-z0-9_]+)/) {
 			print "$1 $2\n";
 		}
 		
+		if(/^^([0-9]+) \.globl ([a-zA-Z0-9_]+)/){
+			$isglobl{$2} = 1;
+		}
+		if(/^^([0-9]+) ([a-zA-Z0-9_]+):$/ && $isglobl{$2}){
+			print "$1 $2\n";
+		}
+		
 		if (/\(/) {
 			next;
 		}
-- 
cgit v1.2.3