瀏覽代碼

* Fixed a wrong code caused by a typo. It has been revealed by a note about an unused var.

git-svn-id: trunk@48387 -
yury 4 年之前
父節點
當前提交
9c265d71f0
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/pgenutil.pas

+ 1 - 1
compiler/pgenutil.pas

@@ -990,7 +990,7 @@ uses
                               paramdef2:=tconstsym(tstoreddef(def).genericparas[i]).constdef
                             else
                               paramdef2:=ttypesym(tstoreddef(def).genericparas[i]).typedef;
-                            if not equal_defs(paramdef2,paramdef2) then
+                            if not equal_defs(paramdef1,paramdef2) then
                               begin
                                 allequal:=false;
                                 break;