diff options
| author | spectralio <63775040+spectralio@users.noreply.github.com> | 2025-02-05 13:01:28 +0100 |
|---|---|---|
| committer | Mark Adler <madler@alumni.caltech.edu> | 2025-02-05 21:43:36 -0800 |
| commit | 0b29118367551a44612a725970f7f6ff258cab06 (patch) | |
| tree | 38bd5e12958b34cd5e44328f430aa5e99559cc0b | |
| parent | c715ad71fe514b5e7768b1b334fc0b09f35842a3 (diff) | |
| download | zlib-0b29118367551a44612a725970f7f6ff258cab06.tar.gz zlib-0b29118367551a44612a725970f7f6ff258cab06.tar.bz2 zlib-0b29118367551a44612a725970f7f6ff258cab06.zip | |
Fix Ada bindings on x64.
| -rw-r--r-- | contrib/ada/zlib-thin.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/contrib/ada/zlib-thin.adb b/contrib/ada/zlib-thin.adb index 0ca4a71..b28f922 100644 --- a/contrib/ada/zlib-thin.adb +++ b/contrib/ada/zlib-thin.adb | |||
| @@ -12,7 +12,8 @@ package body ZLib.Thin is | |||
| 12 | 12 | ||
| 13 | ZLIB_VERSION : constant Chars_Ptr := zlibVersion; | 13 | ZLIB_VERSION : constant Chars_Ptr := zlibVersion; |
| 14 | 14 | ||
| 15 | Z_Stream_Size : constant Int := Z_Stream'Size / System.Storage_Unit; | 15 | Dummy : Z_Stream; |
| 16 | Z_Stream_Size : constant Int := Dummy'Size / System.Storage_Unit; | ||
| 16 | 17 | ||
| 17 | -------------- | 18 | -------------- |
| 18 | -- Avail_In -- | 19 | -- Avail_In -- |