aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--contrib/ada/readme.txt2
-rw-r--r--contrib/ada/test.adb4
2 files changed, 3 insertions, 3 deletions
diff --git a/contrib/ada/readme.txt b/contrib/ada/readme.txt
index 7f42090..efdd639 100644
--- a/contrib/ada/readme.txt
+++ b/contrib/ada/readme.txt
@@ -9,7 +9,7 @@ It provides Ada-style access to the ZLib C library.
9 Here are the main changes since ZLib.Ada 1.2: 9 Here are the main changes since ZLib.Ada 1.2:
10 10
11- Attention: ZLib.Read generic routine have a initialization requirement 11- Attention: ZLib.Read generic routine have a initialization requirement
12 for Read_Last parameter now. It is a bit incompartible with previous version, 12 for Read_Last parameter now. It is a bit incompatible with previous version,
13 but extends functionality, we could use new parameters Allow_Read_Some and 13 but extends functionality, we could use new parameters Allow_Read_Some and
14 Flush now. 14 Flush now.
15 15
diff --git a/contrib/ada/test.adb b/contrib/ada/test.adb
index 90773ac..8b35031 100644
--- a/contrib/ada/test.adb
+++ b/contrib/ada/test.adb
@@ -65,12 +65,12 @@ procedure Test is
65 Time_Stamp : Ada.Calendar.Time; 65 Time_Stamp : Ada.Calendar.Time;
66 66
67 procedure Generate_File; 67 procedure Generate_File;
68 -- Generate file of spetsified size with some random data. 68 -- Generate file of specified size with some random data.
69 -- The random data is repeatable, for the good compression. 69 -- The random data is repeatable, for the good compression.
70 70
71 procedure Compare_Streams 71 procedure Compare_Streams
72 (Left, Right : in out Root_Stream_Type'Class); 72 (Left, Right : in out Root_Stream_Type'Class);
73 -- The procedure compearing data in 2 streams. 73 -- The procedure comparing data in 2 streams.
74 -- It is for compare data before and after compression/decompression. 74 -- It is for compare data before and after compression/decompression.
75 75
76 procedure Compare_Files (Left, Right : String); 76 procedure Compare_Files (Left, Right : String);