From 91e7cfe503506dcdac6df0826c6f10b51373c828 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Wed, 3 Dec 2014 19:11:07 +0100
Subject: [PATCH] fix, char literal escape

---
 src/ce_d2syn.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/ce_d2syn.pas b/src/ce_d2syn.pas
index 27cb83e9..bc1cd569 100644
--- a/src/ce_d2syn.pas
+++ b/src/ce_d2syn.pas
@@ -709,7 +709,7 @@ begin
     fTokKind := tkStrng;
     while true do
     begin
-      if reader[0..1] = '\'#39 then
+      if reader^ = '\' then
       begin
         readerNext;
         readerNext;