From d186cb605f369b7849dea943ed6bd6a9f7ceb9c8 Mon Sep 17 00:00:00 2001
From: eck <none@none>
Date: Tue, 24 Oct 1989 15:06:23 +0000
Subject: [PATCH] removed bug for identifiers starting with L

---
 lang/cem/cpp.ansi/preprocess.c | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lang/cem/cpp.ansi/preprocess.c b/lang/cem/cpp.ansi/preprocess.c
index d2f7110fd..fdd6f7ca3 100644
--- a/lang/cem/cpp.ansi/preprocess.c
+++ b/lang/cem/cpp.ansi/preprocess.c
@@ -233,11 +233,12 @@ preprocess(fn)
 				}
 				continue;
 			case STELL:
+				c = GetChar();
+				UnGetChar();
 				if (c == '"' || c == '\'') {
-					echo(c);
+					echo('L');
 					continue;
 				}
-				UnGetChar();
 				c = 'L';
 			case STIDF: {
 				extern int idfsize;		/* ??? */
-- 
2.34.1