summaryrefslogtreecommitdiff
path: root/contrib/ada/zlib-streams.ads
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/ada/zlib-streams.ads')
-rw-r--r--contrib/ada/zlib-streams.ads6
1 files changed, 4 insertions, 2 deletions
diff --git a/contrib/ada/zlib-streams.ads b/contrib/ada/zlib-streams.ads
index 1d5e904..5c68667 100644
--- a/contrib/ada/zlib-streams.ads
+++ b/contrib/ada/zlib-streams.ads
@@ -6,7 +6,7 @@
6-- Open source license information is in the zlib.ads file. -- 6-- Open source license information is in the zlib.ads file. --
7---------------------------------------------------------------- 7----------------------------------------------------------------
8 8
9-- $Id: zlib-streams.ads,v 1.11 2003/08/12 13:15:31 vagul Exp $ 9-- $Id: zlib-streams.ads,v 1.12 2004/05/31 10:53:40 vagul Exp $
10 10
11package ZLib.Streams is 11package ZLib.Streams is
12 12
@@ -77,6 +77,8 @@ package ZLib.Streams is
77 -- !!! When the Need_Header is False ZLib-Ada is using undocumented 77 -- !!! When the Need_Header is False ZLib-Ada is using undocumented
78 -- ZLib 1.1.4 functionality to do not create/wait for ZLib headers. 78 -- ZLib 1.1.4 functionality to do not create/wait for ZLib headers.
79 79
80 function Is_Open (Stream : Stream_Type) return Boolean;
81
80 procedure Close (Stream : in out Stream_Type); 82 procedure Close (Stream : in out Stream_Type);
81 83
82private 84private
@@ -109,4 +111,4 @@ private
109 Writer : Filter_Type; 111 Writer : Filter_Type;
110 end record; 112 end record;
111 113
112end ZLib.Streams; 114end ZLib.Streams; \ No newline at end of file