From 6f00d4f4a79bc7fc808d286175005b5def061ea9 Mon Sep 17 00:00:00 2001
From: Adam Sampson <ats@offog.org>
Date: Tue, 21 Aug 2007 22:19:54 +0000
Subject: [PATCH] Make the label regex more specific. This makes it only
 generate legal labels in the .post.c file.

---
 AnalyseAsm.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/AnalyseAsm.hs b/AnalyseAsm.hs
index 8932324..a283686 100644
--- a/AnalyseAsm.hs
+++ b/AnalyseAsm.hs
@@ -68,7 +68,7 @@ parseAsmLine s
             Just [l] -> Just $ AsmFunction l
             _ -> Nothing
       where
-        labelRE = mkRegex "^([^\\.0-9].*):$"
+        labelRE = mkRegex "^([^\\.0-9][a-zA-Z0-9_]*):$"
 
     matchInc :: String -> Maybe AsmItem
     matchInc s