From ac17c180e1b255e4f7f17e3f856e1f813d47dd87 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Sat, 5 Sep 2015 22:37:05 +0200
Subject: [PATCH] fix missing comparison rhs

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

diff --git a/src/ce_common.pas b/src/ce_common.pas
index 9f5742ca..0bd0e4c6 100644
--- a/src/ce_common.pas
+++ b/src/ce_common.pas
@@ -1046,7 +1046,7 @@ begin
     exit;
   if str[1] = ';' then
     result := true;
-  if (length(str) > ) and (str[1..2] = '//') then
+  if (length(str) > 1) and (str[1..2] = '//') then
     result := true;
 end;