From 1c33a5bb4a05701f6c2107e443c35212b045391c Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Tue, 29 Mar 2016 04:30:25 +0200
Subject: [PATCH] fix highlighter, property for int litterals

---
 src/ce_d2syn.pas | 21 ++++++++-------------
 1 file changed, 8 insertions(+), 13 deletions(-)

diff --git a/src/ce_d2syn.pas b/src/ce_d2syn.pas
index 1b8f3257..997449f7 100644
--- a/src/ce_d2syn.pas
+++ b/src/ce_d2syn.pas
@@ -851,7 +851,14 @@ begin
     if reader^ <> '.' then
       while isNumber(readerNext^) or (reader^ = '_') do (*!*);
     if reader^ = '.' then
-      while isNumber(readerNext^) or (reader^ = '_') do (*!*);
+    begin
+      if isNumber(readerNext^) then
+      begin
+        while isNumber(reader^) or (reader^ = '_') do
+          readerNext;
+      end else
+        readerPrev;
+    end;
     if reader^= '.' then
     begin
       readerNext;
@@ -889,18 +896,6 @@ begin
   end;
   _notDotFloat:
 
-  // generic number literals
-  //if (isNumber(reader^)) then
-  //begin
-  //  while isHex(readerNext^) or (reader^ = '_') or (reader^ = '.')
-  //    or (reader^ in ['x', 'X', 'u', 'U', 'L', 'i']) do (*!*);
-  //  if isWhite(reader^) or isSymbol(reader^) or isOperator1(reader^) then
-  //    fTokKind := tkNumbr
-  //  else
-  //    fTokKind := tkError;
-  //  exit;
-  //end;
-
   // symbols
   if isSymbol(reader^) then
   begin