Browse Source

* avoid warning/error on uninitialized variable

florian 3 years ago
parent
commit
115f83794b
1 changed files with 3 additions and 0 deletions
  1. 3 0
      rtl/inc/sstrings.inc

+ 3 - 0
rtl/inc/sstrings.inc

@@ -1277,6 +1277,9 @@ begin
     {$ifdef CPU64}
     8: UpperLimit:=High(QWord);
     {$endif CPU64}
+    else
+      { avoid error about being uninitialized }
+      UpperLimit:=0;
   end;
   {$else VER3_2}
   UpperLimit:=High(ValUInt);  //this preserves 3.2 (and earlier) behaviour