diff options
| -rw-r--r-- | contrib/ada/readme.txt | 2 | ||||
| -rw-r--r-- | contrib/ada/test.adb | 4 |
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); |
