1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
|
--- generic/adler.c Wed Aug 9 15:13:17 2000
+++ generic/adler.c Fri Feb 15 15:09:44 2002
@@ -63,5 +63,5 @@
MDAdler_UpdateBuf,
MDAdler_Final,
- MDAdler_Check
+ NULL
};
@@ -222,36 +222,2 @@
out [3] = (char) ((adler >> 0) & 0xff);
}
-
-/*
- *------------------------------------------------------*
- *
- * MDAdler_Check --
- *
- * ------------------------------------------------*
- * Check for existence of libz, load it.
- * ------------------------------------------------*
- *
- * Sideeffects:
- * As of the called procedure.
- *
- * Result:
- * None.
- *
- *------------------------------------------------------*
- */
-
-static int
-MDAdler_Check (interp)
-Tcl_Interp* interp;
-{
- int res;
-
- START (MDAdler_Check);
-
- res = TrfLoadZlib (interp);
-
- PRINT ("res = %d\n", res);
- DONE (MDAdler_Check);
- return res;
-}
-
--- generic/crc_zlib.c Wed Aug 9 15:13:17 2000
+++ generic/crc_zlib.c Fri Feb 15 15:11:49 2002
@@ -63,5 +63,5 @@
MDcrcz_UpdateBuf,
MDcrcz_Final,
- MDcrcz_Check
+ NULL
};
@@ -217,28 +217,2 @@
out [0] = (char) ((crc >> 0) & 0xff);
}
-
-/*
- *------------------------------------------------------*
- *
- * MDcrcz_Check --
- *
- * ------------------------------------------------*
- * Check for existence of libz, load it.
- * ------------------------------------------------*
- *
- * Sideeffects:
- * As of the called procedure.
- *
- * Result:
- * None.
- *
- *------------------------------------------------------*
- */
-
-static int
-MDcrcz_Check (interp)
-Tcl_Interp* interp;
-{
- return TrfLoadZlib (interp);
-}
-
--- generic/zip_opt.c Sat Nov 18 17:42:32 2000
+++ generic/zip_opt.c Fri Feb 15 15:13:22 2002
@@ -183,13 +183,4 @@
/*
- * 'zip' is used, therefore load the required library.
- * And bail out if it is not available.
- */
-
- if (TCL_OK != TrfLoadZlib (interp)) {
- return TCL_ERROR;
- }
-
- /*
* Now perform the real option check.
*/
|
