浏览代码

Use setlow field of tsetdef class to generate new set typedef in set add node

Pierre Muller 2 月之前
父节点
当前提交
e1509e1c6d
共有 1 个文件被更改,包括 2 次插入2 次删除
  1. 2 2
      compiler/nadd.pas

+ 2 - 2
compiler/nadd.pas

@@ -2768,13 +2768,13 @@ const
                   begin
                     if assigned(tsetdef(ld).elementdef) then
                       begin
-                        llow:=tsetdef(ld).setbase;
+                        llow:=tsetdef(ld).setlow;
                         lhigh:=tsetdef(ld).setmax;
                       end;
                     if (rd.typ=setdef) then
                       if assigned(tsetdef(rd).elementdef) then
                         begin
-                          rlow:=tsetdef(rd).setbase;
+                          rlow:=tsetdef(rd).setlow;
                           rhigh:=tsetdef(rd).setmax;
                         end
                       else