diff options
| author | Mark Adler <madler@alumni.caltech.edu> | 2011-09-09 23:24:02 -0700 |
|---|---|---|
| committer | Mark Adler <madler@alumni.caltech.edu> | 2011-09-09 23:24:02 -0700 |
| commit | 79fbcdc939b5d515218187a0d5f2526fb632075a (patch) | |
| tree | dc82b3a452568093ab8a9f365126ba56a419eea1 /contrib/ada | |
| parent | 7a6955760ba950eb82f57929f8f6c9847c65f0af (diff) | |
| download | zlib-1.2.2.tar.gz zlib-1.2.2.tar.bz2 zlib-1.2.2.zip | |
zlib 1.2.2v1.2.2
Diffstat (limited to 'contrib/ada')
| -rw-r--r-- | contrib/ada/readme.txt | 12 | ||||
| -rw-r--r-- | contrib/ada/zlib-streams.adb | 2 | ||||
| -rw-r--r-- | contrib/ada/zlib-streams.ads | 2 | ||||
| -rw-r--r-- | contrib/ada/zlib.gpr | 41 |
4 files changed, 28 insertions, 29 deletions
diff --git a/contrib/ada/readme.txt b/contrib/ada/readme.txt index dec7ef3..ce4d2ca 100644 --- a/contrib/ada/readme.txt +++ b/contrib/ada/readme.txt | |||
| @@ -1,12 +1,12 @@ | |||
| 1 | ZLib for Ada thick binding (ZLib.Ada) | 1 | ZLib for Ada thick binding (ZLib.Ada) |
| 2 | Release 1.3 | 2 | Release 1.3 |
| 3 | 3 | ||
| 4 | ZLib.Ada is a thick binding interface to the popular ZLib data | 4 | ZLib.Ada is a thick binding interface to the popular ZLib data |
| 5 | compression library, available at http://www.gzip.org/zlib/. | 5 | compression library, available at http://www.gzip.org/zlib/. |
| 6 | It provides Ada-style access to the ZLib C library. | 6 | It provides Ada-style access to the ZLib C library. |
| 7 | 7 | ||
| 8 | 8 | ||
| 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 | - Attension: ZLib.Read generic routine have a initialization requirement | 11 | - Attension: 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 incompartible with previous version, |
| @@ -28,7 +28,7 @@ It provides Ada-style access to the ZLib C library. | |||
| 28 | - Add pragma Assertion that Ada.Streams.Stream_Element size is 8 bit. | 28 | - Add pragma Assertion that Ada.Streams.Stream_Element size is 8 bit. |
| 29 | 29 | ||
| 30 | 30 | ||
| 31 | How to build ZLib.Ada under GNAT | 31 | How to build ZLib.Ada under GNAT |
| 32 | 32 | ||
| 33 | You should have the ZLib library already build on your computer, before | 33 | You should have the ZLib library already build on your computer, before |
| 34 | building ZLib.Ada. Make the directory of ZLib.Ada sources current and | 34 | building ZLib.Ada. Make the directory of ZLib.Ada sources current and |
| @@ -41,7 +41,7 @@ Or use the GNAT project file build for GNAT 3.15 or later: | |||
| 41 | gnatmake -Pzlib.gpr -L<directory where libz.a is> | 41 | gnatmake -Pzlib.gpr -L<directory where libz.a is> |
| 42 | 42 | ||
| 43 | 43 | ||
| 44 | How to build ZLib.Ada under Aonix ObjectAda for Win32 7.2.2 | 44 | How to build ZLib.Ada under Aonix ObjectAda for Win32 7.2.2 |
| 45 | 45 | ||
| 46 | 1. Make a project with all *.ads and *.adb files from the distribution. | 46 | 1. Make a project with all *.ads and *.adb files from the distribution. |
| 47 | 2. Build the libz.a library from the ZLib C sources. | 47 | 2. Build the libz.a library from the ZLib C sources. |
| @@ -51,7 +51,7 @@ Or use the GNAT project file build for GNAT 3.15 or later: | |||
| 51 | 6. Build the executable using test.adb as a main procedure. | 51 | 6. Build the executable using test.adb as a main procedure. |
| 52 | 52 | ||
| 53 | 53 | ||
| 54 | How to use ZLib.Ada | 54 | How to use ZLib.Ada |
| 55 | 55 | ||
| 56 | The source files test.adb and read.adb are small demo programs that show | 56 | The source files test.adb and read.adb are small demo programs that show |
| 57 | the main functionality of ZLib.Ada. | 57 | the main functionality of ZLib.Ada. |
diff --git a/contrib/ada/zlib-streams.adb b/contrib/ada/zlib-streams.adb index 398664a..b6497ba 100644 --- a/contrib/ada/zlib-streams.adb +++ b/contrib/ada/zlib-streams.adb | |||
| @@ -222,4 +222,4 @@ package body ZLib.Streams is | |||
| 222 | return Total_Out (Stream.Writer); | 222 | return Total_Out (Stream.Writer); |
| 223 | end Write_Total_Out; | 223 | end Write_Total_Out; |
| 224 | 224 | ||
| 225 | end ZLib.Streams; \ No newline at end of file | 225 | end ZLib.Streams; |
diff --git a/contrib/ada/zlib-streams.ads b/contrib/ada/zlib-streams.ads index 5c68667..f0193c6 100644 --- a/contrib/ada/zlib-streams.ads +++ b/contrib/ada/zlib-streams.ads | |||
| @@ -111,4 +111,4 @@ private | |||
| 111 | Writer : Filter_Type; | 111 | Writer : Filter_Type; |
| 112 | end record; | 112 | end record; |
| 113 | 113 | ||
| 114 | end ZLib.Streams; \ No newline at end of file | 114 | end ZLib.Streams; |
diff --git a/contrib/ada/zlib.gpr b/contrib/ada/zlib.gpr index 88f51cc..296b22a 100644 --- a/contrib/ada/zlib.gpr +++ b/contrib/ada/zlib.gpr | |||
| @@ -1,21 +1,20 @@ | |||
| 1 | project Zlib is | 1 | project Zlib is |
| 2 | 2 | ||
| 3 | for Languages use ("Ada"); | 3 | for Languages use ("Ada"); |
| 4 | for Source_Dirs use ("."); | 4 | for Source_Dirs use ("."); |
| 5 | for Object_Dir use "."; | 5 | for Object_Dir use "."; |
| 6 | for Main use ("test.adb", "mtest.adb", "read.adb", "buffer_demo"); | 6 | for Main use ("test.adb", "mtest.adb", "read.adb", "buffer_demo"); |
| 7 | 7 | ||
| 8 | package Compiler is | 8 | package Compiler is |
| 9 | for Default_Switches ("ada") use ("-gnatwcfilopru", "-gnatVcdfimorst", "-gnatyabcefhiklmnoprst"); | 9 | for Default_Switches ("ada") use ("-gnatwcfilopru", "-gnatVcdfimorst", "-gnatyabcefhiklmnoprst"); |
| 10 | end Compiler; | 10 | end Compiler; |
| 11 | 11 | ||
| 12 | package Linker is | 12 | package Linker is |
| 13 | for Default_Switches ("ada") use ("-lz"); | 13 | for Default_Switches ("ada") use ("-lz"); |
| 14 | end Linker; | 14 | end Linker; |
| 15 | 15 | ||
| 16 | package Builder is | 16 | package Builder is |
| 17 | for Default_Switches ("ada") use ("-s", "-gnatQ"); | 17 | for Default_Switches ("ada") use ("-s", "-gnatQ"); |
| 18 | end Builder; | 18 | end Builder; |
| 19 | 19 | ||
| 20 | end Zlib; | 20 | end Zlib; |
| 21 | |||
