瀏覽代碼

* Reverted (rle_len and count) code

daniel 23 年之前
父節點
當前提交
cc9ec145c4
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      packages/extra/bzip2/bzip2.pas

+ 1 - 1
packages/extra/bzip2/bzip2.pas

@@ -692,7 +692,7 @@ rle_write:
             inc(bufptr);
             dec(count);
             dec(rle_len);
-        until (rle_len and count)=0;
+        until (rle_len=0) or (count=0);
       until count=0;
       short:=count;
     end;