diff options
| author | daniel <daniel@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2007-12-02 11:34:11 +0000 |
|---|---|---|
| committer | daniel <daniel@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2007-12-02 11:34:11 +0000 |
| commit | 13155d3683dd53b51bc061fbc5d29ffa4bd5a707 (patch) | |
| tree | 53a524bd15758c8a49ba3f96b30e52aa78224a44 | |
| parent | 64e5b6ffd1a8b2284181a7f39bcb96ac60b50e77 (diff) | |
| download | fpc-13155d3683dd53b51bc061fbc5d29ffa4bd5a707.tar.gz | |
* Use zerror rather than hardcoded error table.
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@9380 3ad0048d-3df7-0310-abae-a5850022a9f2
| -rw-r--r-- | packages/paszlib/src/zdeflate.pas | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/packages/paszlib/src/zdeflate.pas b/packages/paszlib/src/zdeflate.pas index d6f39269da..a7054bfc3d 100644 --- a/packages/paszlib/src/zdeflate.pas +++ b/packages/paszlib/src/zdeflate.pas @@ -587,7 +587,7 @@ begin (s^.pending_buf=nil) then begin {ERR_MSG(Z_MEM_ERROR);} - strm.msg := z_errmsg[z_errbase-Z_MEM_ERROR]; + strm.msg := zerror(Z_MEM_ERROR); deflateEnd (strm); deflateInit2_ := Z_MEM_ERROR; exit; @@ -857,14 +857,14 @@ begin ((s^.status=FINISH_STATE) and (flush<>Z_FINISH)) then begin {ERR_RETURN(strm^, Z_STREAM_ERROR);} - strm.msg := z_errmsg[z_errbase - Z_STREAM_ERROR]; + strm.msg := zerror(Z_STREAM_ERROR); deflate := Z_STREAM_ERROR; exit; end; if (strm.avail_out = 0) then begin {ERR_RETURN(strm^, Z_BUF_ERROR);} - strm.msg := z_errmsg[z_errbase - Z_BUF_ERROR]; + strm.msg := zerror(Z_BUF_ERROR); deflate := Z_BUF_ERROR; exit; end; @@ -926,7 +926,7 @@ begin and (flush <> Z_FINISH) then begin {ERR_RETURN(strm^, Z_BUF_ERROR);} - strm.msg := z_errmsg[z_errbase - Z_BUF_ERROR]; + strm.msg := zerror(Z_BUF_ERROR); deflate := Z_BUF_ERROR; exit; end; @@ -935,7 +935,7 @@ begin if (s^.status = FINISH_STATE) and (strm.avail_in <> 0) then begin {ERR_RETURN(strm^, Z_BUF_ERROR);} - strm.msg := z_errmsg[z_errbase - Z_BUF_ERROR]; + strm.msg := zerror(Z_BUF_ERROR); deflate := Z_BUF_ERROR; exit; end; |