瀏覽代碼

* fix use of unitialised value if a procedure only has an
array of const parameter

git-svn-id: trunk@3655 -

Jonas Maebe 19 年之前
父節點
當前提交
d1e262d18c
共有 1 個文件被更改,包括 1 次插入0 次删除
  1. 1 0
      compiler/i386/cpupara.pas

+ 1 - 0
compiler/i386/cpupara.pas

@@ -381,6 +381,7 @@ unit cpupara;
         paracgsize : tcgsize;
       begin
         paraalign:=get_para_align(p.proccalloption);
+        parasize := 0;
         { we push Flags and CS as long
           to cope with the IRETD
           and we save 6 register + 4 selectors }