FP: Accept uppercase scientific notation

The floating-point parser only recognized lowercase e for scientific notation.

Author: adriweb

scripts/cli_smoke_tests.sh

@@ -19,5 +19,8 @@ printf '1' > "$TMP_DIR/one_real.txt"
 printf '{1,2}\n' > "$TMP_DIR/list_with_newline.txt"
 "$CLI" -i "$TMP_DIR/list_with_newline.txt" -j readable -o "$TMP_DIR/list_with_newline.8xl" -k varfile -t RealList -n L1
 
+printf '{1E2}\n' > "$TMP_DIR/list_with_uppercase_exp.txt"
+"$CLI" -i "$TMP_DIR/list_with_uppercase_exp.txt" -j readable -o "$TMP_DIR/list_with_uppercase_exp.8xl" -k varfile -t RealList -n L1
+
 printf '[[1,2][3,4]]\n' > "$TMP_DIR/matrix_with_newline.txt"
 "$CLI" -i "$TMP_DIR/matrix_with_newline.txt" -j readable -o "$TMP_DIR/matrix_with_newline.8xm" -k varfile -t Matrix -n A

src/TypeHandlers/STH_FP.cpp

@@ -76,7 +76,7 @@ namespace tivars::TypeHandlers
                     }
                     index = (dataByteCount << 1) + 1;
                 }
-            } else if (c == 'e') {
+            } else if (c == 'e' || c == 'E') {
                 const bool sign = parseSign(i, e);
                 int offset = 0;
                 do {

tests.cpp

@@ -1454,6 +1454,8 @@ End)";
         assert(testRealList.getReadableContent() == content);
         testRealList.setContentFromString("{1,2}\n");
         assert(testRealList.getReadableContent() == "{1,2}");
+        testRealList.setContentFromString("{1E2,3}");
+        assert(testRealList.getReadableContent() == "{100,3}");
     }
 
     {