From f740485a5ab2ecef741bf1161b9feeea9c18cac0 Mon Sep 17 00:00:00 2001
From: Detlef Riekenberg <tcc.dev@web.de>
Date: Mon, 5 Apr 2010 12:28:27 +0200
Subject: tccpp: Allow local labels to start with a dot

--
By by ... Detlef
---
 tccpp.c | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'tccpp.c')

diff --git a/tccpp.c b/tccpp.c
index 9a4cbca..51348cf 100644
--- a/tccpp.c
+++ b/tccpp.c
@@ -2279,6 +2279,12 @@ maybe_newline:
         tok = TOK_PPNUM;
         break;
     case '.':
+        /* check first for a local label (.Lxx:) */
+        if (p[1] == 'L') {
+            /* fast case */
+            goto parse_ident_fast;
+        }
+
         /* special dot handling because it can also start a number */
         PEEKC(c, p);
         if (isnum(c)) {
-- 
cgit v1.3.1