Make the label regex more specific.

This makes it only generate legal labels in the .post.c file.
2007-08-21 22:19:54 +00:00 · 2007-08-21 22:19:54 +00:00 · 6f00d4f4a7
commit 6f00d4f4a7
parent bd44a1c748
1 changed files with 1 additions and 1 deletions
--- 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