瀏覽代碼

* avoid warning/error on uninitialized variable

florian 3 年之前
父節點
當前提交
115f83794b
共有 1 個文件被更改,包括 3 次插入0 次删除
  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