From 8998e5606938a0c169059ed4bf66fbbe70134475 Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Mon, 15 Nov 1993 09:25:32 +0000
Subject: [PATCH] Fixed bug

---
 lang/cem/cemcom/skip.c | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/lang/cem/cemcom/skip.c b/lang/cem/cemcom/skip.c
index f06f24acd..5da339b27 100644
--- a/lang/cem/cemcom/skip.c
+++ b/lang/cem/cemcom/skip.c
@@ -69,6 +69,28 @@ skipline()
 
 	LoadChar(c);
 	while (class(c) != STNL && c != EOI) {
+		if (class(c) == STSTR || class(c) == STCHAR) {
+			register int stopc = c;
+			int escaped;
+			do {
+				escaped = 0;
+				LoadChar(c);
+				if (class(c) == STNL || c == EOI) {
+					break;
+				}
+				if (c == '\\') {
+					LoadChar(c);
+					if (c == '\n') {
+						++LineNumber;
+					}
+					else escaped = 1;
+				}
+			} while (escaped || c != stopc);
+			if (class(c) != STNL && c != EOI) {
+				LoadChar(c);
+			}
+			continue;
+		}
 		if (c == '\\') {
 			LoadChar(c);
 			if (class(c) == STNL)
-- 
2.34.1