From 8d78700c119e988c0d117df474f8c32334cd2bcf Mon Sep 17 00:00:00 2001
From: Fellippe Heitor <fellippeheitor@gmail.com>
Date: Fri, 5 Feb 2021 00:57:05 -0300
Subject: [PATCH] Fixes CONST failing in CamelCase mode with logical operators.

---
 source/qb64.bas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/source/qb64.bas b/source/qb64.bas
index f03c96fcd..46f9676af 100644
--- a/source/qb64.bas
+++ b/source/qb64.bas
@@ -23297,7 +23297,7 @@ FUNCTION evaluateconst$ (a2$, t AS LONG)
             EXIT FUNCTION
         END IF
 
-        IF o$ = "NOT" THEN
+        IF UCASE$(o$) = "NOT" THEN
             IF btype(2) AND ISFLOAT THEN
                 r&& = _CV(_FLOAT, block(2))
             ELSE
@@ -23325,7 +23325,7 @@ FUNCTION evaluateconst$ (a2$, t AS LONG)
 
     'get operator
     IF i >= n THEN Give_Error "Invalid CONST expression.8": EXIT FUNCTION
-    o$ = block(i)
+    o$ = UCASE$(block(i))
     i = i + 1
     IF isoperator(o$) = 0 THEN Give_Error "Invalid CONST expression.9": EXIT FUNCTION
     IF i > n THEN Give_Error "Invalid CONST expression.10": EXIT FUNCTION