Skip to content

Commit 9b3df6d

Browse files
Update for 3.4.9 release
1 parent a92634d commit 9b3df6d

File tree

15 files changed

+2172
-1844
lines changed

15 files changed

+2172
-1844
lines changed

zlib/adler32.c

Lines changed: 33 additions & 39 deletions
Original file line numberDiff line numberDiff line change
@@ -5,35 +5,33 @@
55

66
/* @(#) $Id$ */
77

8-
#if defined( __MVS__ ) /* pcg */
9-
/* MVS control section (CSECT) names default to the file name and cannot
10-
match any extern function name in the file. This only applies to the
11-
CSECT compiler option. Without a csect name, when maintenance is
12-
applied to an MVS program the newly introduced csect is ordered ahead
13-
of the previos csects. With csect names, the new csect replaces the
14-
old csect. So without csect names, as maintenance is applied
15-
throughout the life of the executable, the executable size
16-
continually increases--not a good thing.
17-
18-
These files required the pragma since they contained external function
19-
names that matched the file names, which is the default csect name
20-
generated by the compiler with the csect option. You cannot have the
21-
same externally visible name defined for two different entities */
22-
#pragma csect( CODE, "adler32C" )
23-
#pragma csect( STATIC, "adler32S" )
24-
#pragma csect( TEST, "adler32T" )
25-
#endif /* __MVS__ */
26-
27-
#define ZLIB_INTERNAL /* pcg */
28-
#if defined( INC_ALL )
29-
#include "zutil.h"
30-
#else
31-
#include "zlib/zutil.h"
32-
#endif /* Compiler-specific includes */
33-
34-
#if defined( USE_COMPRESSION ) && !defined( HAS_ZLIB )
35-
36-
local uLong adler32_combine_ OF((uLong adler1, uLong adler2, z_off64_t len2));
8+
#if defined( __MVS__ ) /* pcg */
9+
/* MVS control section (CSECT) names default to the file name and cannot
10+
match any extern function name in the file. This only applies to the
11+
CSECT compiler option. Without a csect name, when maintenance is
12+
applied to an MVS program the newly introduced csect is ordered ahead
13+
of the previos csects. With csect names, the new csect replaces the
14+
old csect. So without csect names, as maintenance is applied
15+
throughout the life of the executable, the executable size
16+
continually increases--not a good thing.
17+
18+
These files required the pragma since they contained external function
19+
names that matched the file names, which is the default csect name
20+
generated by the compiler with the csect option. You cannot have the
21+
same externally visible name defined for two different entities */
22+
#pragma csect( CODE, "adler32C" )
23+
#pragma csect( STATIC, "adler32S" )
24+
#pragma csect( TEST, "adler32T" )
25+
#endif /* __MVS__ */
26+
27+
#define ZLIB_INTERNAL /* pcg */
28+
#if defined( INC_ALL ) /* pcg */
29+
#include "zutil.h"
30+
#else
31+
#include "zlib/zutil.h"
32+
#endif /* Compiler-specific includes */
33+
34+
#if defined( USE_COMPRESSION ) && !defined( HAS_ZLIB ) /* pcg */
3735

3836
#define BASE 65521U /* largest prime smaller than 65536 */
3937
#define NMAX 5552
@@ -86,8 +84,7 @@ local uLong adler32_combine_ OF((uLong adler1, uLong adler2, z_off64_t len2));
8684
#endif
8785

8886
/* ========================================================================= */
89-
uLong ZEXPORT adler32_z( uLong adler, const Bytef *buf, z_size_t len ) /* pcg */
90-
{
87+
uLong ZEXPORT adler32_z(uLong adler, const Bytef *buf, z_size_t len) {
9188
unsigned long sum2;
9289
unsigned n;
9390

@@ -154,14 +151,12 @@ uLong ZEXPORT adler32_z( uLong adler, const Bytef *buf, z_size_t len ) /* pcg */
154151
}
155152

156153
/* ========================================================================= */
157-
uLong ZEXPORT adler32( uLong adler, const Bytef *buf, uInt len ) /* pcg */
158-
{
154+
uLong ZEXPORT adler32(uLong adler, const Bytef *buf, uInt len) {
159155
return adler32_z(adler, buf, len);
160156
}
161157

162158
/* ========================================================================= */
163-
local uLong adler32_combine_( uLong adler1, uLong adler2, z_off64_t len2 ) /* pcg */
164-
{
159+
local uLong adler32_combine_(uLong adler1, uLong adler2, z_off64_t len2) {
165160
unsigned long sum1;
166161
unsigned long sum2;
167162
unsigned rem;
@@ -186,13 +181,12 @@ local uLong adler32_combine_( uLong adler1, uLong adler2, z_off64_t len2 ) /* p
186181
}
187182

188183
/* ========================================================================= */
189-
uLong ZEXPORT adler32_combine( uLong adler1, uLong adler2, z_off_t len2 ) /* pcg */
190-
{
184+
uLong ZEXPORT adler32_combine(uLong adler1, uLong adler2, z_off_t len2) {
191185
return adler32_combine_(adler1, adler2, len2);
192186
}
193187

194-
uLong ZEXPORT adler32_combine64( uLong adler1, uLong adler2, z_off64_t len2 ) /* pcg */
195-
{
188+
uLong ZEXPORT adler32_combine64(uLong adler1, uLong adler2, z_off64_t len2) {
196189
return adler32_combine_(adler1, adler2, len2);
197190
}
191+
198192
#endif /* USE_COMPRESSION && !HAS_ZLIB */

0 commit comments

Comments
 (0)