diff options
Diffstat (limited to 'contrib/ada')
-rw-r--r-- | contrib/ada/zlib-streams.ads | 6 | ||||
-rw-r--r-- | contrib/ada/zlib-thin.ads | 2 |
2 files changed, 4 insertions, 4 deletions
diff --git a/contrib/ada/zlib-streams.ads b/contrib/ada/zlib-streams.ads index f0193c6..8e26cd4 100644 --- a/contrib/ada/zlib-streams.ads +++ b/contrib/ada/zlib-streams.ads | |||
@@ -31,7 +31,7 @@ package ZLib.Streams is | |||
31 | Mode : in Flush_Mode := Sync_Flush); | 31 | Mode : in Flush_Mode := Sync_Flush); |
32 | -- Flush the written data to the back stream, | 32 | -- Flush the written data to the back stream, |
33 | -- all data placed to the compressor is flushing to the Back stream. | 33 | -- all data placed to the compressor is flushing to the Back stream. |
34 | -- Should not be used untill necessary, becouse it is decreasing | 34 | -- Should not be used until necessary, because it is decreasing |
35 | -- compression. | 35 | -- compression. |
36 | 36 | ||
37 | function Read_Total_In (Stream : in Stream_Type) return Count; | 37 | function Read_Total_In (Stream : in Stream_Type) return Count; |
@@ -97,13 +97,13 @@ private | |||
97 | Rest_Last : Stream_Element_Offset; | 97 | Rest_Last : Stream_Element_Offset; |
98 | -- Buffer for Read operation. | 98 | -- Buffer for Read operation. |
99 | -- We need to have this buffer in the record | 99 | -- We need to have this buffer in the record |
100 | -- becouse not all read data from back stream | 100 | -- because not all read data from back stream |
101 | -- could be processed during the read operation. | 101 | -- could be processed during the read operation. |
102 | 102 | ||
103 | Buffer_Size : Stream_Element_Offset; | 103 | Buffer_Size : Stream_Element_Offset; |
104 | -- Buffer size for write operation. | 104 | -- Buffer size for write operation. |
105 | -- We do not need to have this buffer | 105 | -- We do not need to have this buffer |
106 | -- in the record becouse all data could be | 106 | -- in the record because all data could be |
107 | -- processed in the write operation. | 107 | -- processed in the write operation. |
108 | 108 | ||
109 | Back : Stream_Access; | 109 | Back : Stream_Access; |
diff --git a/contrib/ada/zlib-thin.ads b/contrib/ada/zlib-thin.ads index d4407eb..810173c 100644 --- a/contrib/ada/zlib-thin.ads +++ b/contrib/ada/zlib-thin.ads | |||
@@ -436,7 +436,7 @@ private | |||
436 | 436 | ||
437 | pragma Import (C, inflateBackInit, "inflateBackInit_"); | 437 | pragma Import (C, inflateBackInit, "inflateBackInit_"); |
438 | 438 | ||
439 | -- I stopped binding the inflateBack routines, becouse realize that | 439 | -- I stopped binding the inflateBack routines, because realize that |
440 | -- it does not support zlib and gzip headers for now, and have no | 440 | -- it does not support zlib and gzip headers for now, and have no |
441 | -- symmetric deflateBack routines. | 441 | -- symmetric deflateBack routines. |
442 | -- ZLib-Ada is symmetric regarding deflate/inflate data transformation | 442 | -- ZLib-Ada is symmetric regarding deflate/inflate data transformation |