pike.git/
src/
modules/
Gz/
zlibmod.c
Branch:
Tag:
Non-build tags
All tags
No tags
2001-01-24
2001-01-24 19:03:25 by Henrik Grubbström (Grubba) <grubba@grubba.org>
a5b2c711d770800afe1322d407d7bccf6e8e0040 (
13
lines) (+
8
/-
5
)
[
Show
|
Annotate
]
Branch:
7.9
Cleanup.
Rev: src/modules/Gz/zlibmod.c:1.37
5:
\*/ /**/ #include "global.h"
-
RCSID("$Id: zlibmod.c,v 1.
36
2001/01/
23
18
:
05
:
08
hubbe
Exp $");
+
RCSID("$Id: zlibmod.c,v 1.
37
2001/01/
24
19
:
03
:
25
grubba
Exp $");
#include "zlib_machine.h"
236:
SET_ONERROR(err,toss_buffer,&buf); fail=do_deflate(&buf,this,flush); UNSET_ONERROR(err);
-
pop_n_elems(args);
+
if(fail != Z_OK && fail != Z_STREAM_END) {
-
free
(buf
.s.str
);
+
toss_buffer
(
&
buf);
if(THIS->gz.msg) Pike_error("Error in gz_deflate->deflate(): %s\n",THIS->gz.msg); else Pike_error("Error in gz_deflate->deflate(): %d\n",fail); }
-
+
pop_n_elems(args);
push_string(low_free_buf(&buf)); }
380:
this->gz.avail_in = DO_NOT_WARN(data->len); initialize_buf(&buf);
+
SET_ONERROR(err,toss_buffer,&buf); fail=do_inflate(&buf,this,Z_PARTIAL_FLUSH);
-
pop_n_elems(args);
+
UNSET_ONERROR(err); if(fail != Z_OK && fail != Z_STREAM_END) {
-
free
(buf
.s.str
);
+
toss_buffer
(
&
buf);
if(THIS->gz.msg) Pike_error("Error in gz_inflate->inflate(): %s\n",THIS->gz.msg); else Pike_error("Error in gz_inflate->inflate(): %d\n",fail); }
-
+
pop_n_elems(args);
+
push_string(low_free_buf(&buf)); if(fail != Z_STREAM_END && fail!=Z_OK && !sp[-1].u.string->len) {