浏览代码

Modify is_inlimit function to use setlow instead of setbase field

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

+ 1 - 1
compiler/defutil.pas

@@ -817,7 +817,7 @@ implementation
              is_in_limit:=(tenumdef(def_from).min>=tenumdef(def_to).min) and
              is_in_limit:=(tenumdef(def_from).min>=tenumdef(def_to).min) and
                           (tenumdef(def_from).max<=tenumdef(def_to).max);
                           (tenumdef(def_from).max<=tenumdef(def_to).max);
            setdef:
            setdef:
-             is_in_limit:=(tsetdef(def_from).setbase>=tsetdef(def_to).setbase) and
+             is_in_limit:=(tsetdef(def_from).setlow>=tsetdef(def_to).setlow) and
                           (tsetdef(def_from).setmax<=tsetdef(def_to).setmax);
                           (tsetdef(def_from).setmax<=tsetdef(def_to).setmax);
          else
          else
            is_in_limit:=false;
            is_in_limit:=false;