浏览代码

* more false positives of unintialized varibles worked around

florian 3 年之前
父节点
当前提交
366aedc6d8
共有 1 个文件被更改,包括 3 次插入0 次删除
  1. 3 0
      rtl/inc/sstrings.inc

+ 3 - 0
rtl/inc/sstrings.inc

@@ -1167,6 +1167,9 @@ begin
   Temp:=0;
   Code:=InitVal(s,negative,base);
 
+  { avoid error about being uninitialized }
+  UnsignedUpperLimit := 0;
+
   if (base=10) or negative then
     begin //always limit to either Low(DestType) or High(DestType)
       case DestSize of