Last active
March 17, 2022 18:34
-
-
Save ytomino/36d46a25ec8ac5a07a63892aff535d03 to your computer and use it in GitHub Desktop.
zlib in x86_64-linux-gnu
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package body C.bits.byteswap is | |
function bswap_32 (bsx : unsigned_int) return unsigned_int is | |
begin | |
return builtin_bswap32 (bsx); | |
end bswap_32; | |
function bswap_64 (bsx : types.uint64_t) return types.uint64_t is | |
begin | |
return types.uint64_t (builtin_bswap64 (unsigned_long_long (bsx))); | |
end bswap_64; | |
end C.bits.byteswap; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
with C.bits.types; | |
package C.bits.byteswap is | |
pragma Preelaborate; | |
function bswap_32 (bsx : unsigned_int) return unsigned_int; | |
pragma Convention (C, bswap_32); | |
pragma Inline (bswap_32); | |
function bswap_64 (bsx : types.uint64_t) return types.uint64_t; | |
pragma Convention (C, bswap_64); | |
pragma Inline (bswap_64); | |
BITS_BYTESWAP_H : constant := 1; | |
-- __bswap_constant_16 (function macro) | |
-- __bswap_constant_32 (function macro) | |
-- __bswap_constant_64 (function macro) | |
end C.bits.byteswap; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.bits.byteswap_16 is | |
pragma Preelaborate; | |
-- __bswap_16 (function macro) | |
end C.bits.byteswap_16; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
with Ada.Unchecked_Conversion; | |
package C.bits.confname is | |
pragma Preelaborate; | |
type enum_7054a668 is (qPC_LINK_MAX, qPC_MAX_CANON, qPC_MAX_INPUT, | |
qPC_NAME_MAX, qPC_PATH_MAX, qPC_PIPE_BUF, qPC_CHOWN_RESTRICTED, | |
qPC_NO_TRUNC, qPC_VDISABLE, qPC_SYNC_IO, qPC_ASYNC_IO, qPC_PRIO_IO, | |
qPC_SOCK_MAXBUF, qPC_FILESIZEBITS, qPC_REC_INCR_XFER_SIZE, | |
qPC_REC_MAX_XFER_SIZE, qPC_REC_MIN_XFER_SIZE, qPC_REC_XFER_ALIGN, | |
qPC_ALLOC_SIZE_MIN, qPC_SYMLINK_MAX, qPC_2_SYMLINKS); | |
for enum_7054a668 use (qPC_LINK_MAX => 0, qPC_MAX_CANON => 1, | |
qPC_MAX_INPUT => 2, qPC_NAME_MAX => 3, qPC_PATH_MAX => 4, | |
qPC_PIPE_BUF => 5, qPC_CHOWN_RESTRICTED => 6, qPC_NO_TRUNC => 7, | |
qPC_VDISABLE => 8, qPC_SYNC_IO => 9, qPC_ASYNC_IO => 10, | |
qPC_PRIO_IO => 11, qPC_SOCK_MAXBUF => 12, qPC_FILESIZEBITS => 13, | |
qPC_REC_INCR_XFER_SIZE => 14, qPC_REC_MAX_XFER_SIZE => 15, | |
qPC_REC_MIN_XFER_SIZE => 16, qPC_REC_XFER_ALIGN => 17, | |
qPC_ALLOC_SIZE_MIN => 18, qPC_SYMLINK_MAX => 19, qPC_2_SYMLINKS => 20); | |
pragma Convention (C, enum_7054a668); | |
for enum_7054a668'Size use signed_int'Size; | |
function Cast is new Ada.Unchecked_Conversion (enum_7054a668, signed_int); | |
type enum_154a52aa is (qSC_ARG_MAX, qSC_CHILD_MAX, qSC_CLK_TCK, | |
qSC_NGROUPS_MAX, qSC_OPEN_MAX, qSC_STREAM_MAX, qSC_TZNAME_MAX, | |
qSC_JOB_CONTROL, qSC_SAVED_IDS, qSC_REALTIME_SIGNALS, | |
qSC_PRIORITY_SCHEDULING, qSC_TIMERS, qSC_ASYNCHRONOUS_IO, | |
qSC_PRIORITIZED_IO, qSC_SYNCHRONIZED_IO, qSC_FSYNC, qSC_MAPPED_FILES, | |
qSC_MEMLOCK, qSC_MEMLOCK_RANGE, qSC_MEMORY_PROTECTION, | |
qSC_MESSAGE_PASSING, qSC_SEMAPHORES, qSC_SHARED_MEMORY_OBJECTS, | |
qSC_AIO_LISTIO_MAX, qSC_AIO_MAX, qSC_AIO_PRIO_DELTA_MAX, | |
qSC_DELAYTIMER_MAX, qSC_MQ_OPEN_MAX, qSC_MQ_PRIO_MAX, qSC_VERSION, | |
qSC_PAGESIZE, qSC_RTSIG_MAX, qSC_SEM_NSEMS_MAX, qSC_SEM_VALUE_MAX, | |
qSC_SIGQUEUE_MAX, qSC_TIMER_MAX, qSC_BC_BASE_MAX, qSC_BC_DIM_MAX, | |
qSC_BC_SCALE_MAX, qSC_BC_STRING_MAX, qSC_COLL_WEIGHTS_MAX, | |
qSC_EQUIV_CLASS_MAX, qSC_EXPR_NEST_MAX, qSC_LINE_MAX, qSC_RE_DUP_MAX, | |
qSC_CHARCLASS_NAME_MAX, qSC_2_VERSION, qSC_2_C_BIND, qSC_2_C_DEV, | |
qSC_2_FORT_DEV, qSC_2_FORT_RUN, qSC_2_SW_DEV, qSC_2_LOCALEDEF, qSC_PII, | |
qSC_PII_XTI, qSC_PII_SOCKET, qSC_PII_INTERNET, qSC_PII_OSI, qSC_POLL, | |
qSC_SELECT, qSC_UIO_MAXIOV, qSC_PII_INTERNET_STREAM, | |
qSC_PII_INTERNET_DGRAM, qSC_PII_OSI_COTS, qSC_PII_OSI_CLTS, | |
qSC_PII_OSI_M, qSC_T_IOV_MAX, qSC_THREADS, qSC_THREAD_SAFE_FUNCTIONS, | |
qSC_GETGR_R_SIZE_MAX, qSC_GETPW_R_SIZE_MAX, qSC_LOGIN_NAME_MAX, | |
qSC_TTY_NAME_MAX, qSC_THREAD_DESTRUCTOR_ITERATIONS, | |
qSC_THREAD_KEYS_MAX, qSC_THREAD_STACK_MIN, qSC_THREAD_THREADS_MAX, | |
qSC_THREAD_ATTR_STACKADDR, qSC_THREAD_ATTR_STACKSIZE, | |
qSC_THREAD_PRIORITY_SCHEDULING, qSC_THREAD_PRIO_INHERIT, | |
qSC_THREAD_PRIO_PROTECT, qSC_THREAD_PROCESS_SHARED, | |
qSC_NPROCESSORS_CONF, qSC_NPROCESSORS_ONLN, qSC_PHYS_PAGES, | |
qSC_AVPHYS_PAGES, qSC_ATEXIT_MAX, qSC_PASS_MAX, qSC_XOPEN_VERSION, | |
qSC_XOPEN_XCU_VERSION, qSC_XOPEN_UNIX, qSC_XOPEN_CRYPT, | |
qSC_XOPEN_ENH_I18N, qSC_XOPEN_SHM, qSC_2_CHAR_TERM, qSC_2_C_VERSION, | |
qSC_2_UPE, qSC_XOPEN_XPG2, qSC_XOPEN_XPG3, qSC_XOPEN_XPG4, | |
qSC_CHAR_BIT, qSC_CHAR_MAX, qSC_CHAR_MIN, qSC_INT_MAX, qSC_INT_MIN, | |
qSC_LONG_BIT, qSC_WORD_BIT, qSC_MB_LEN_MAX, qSC_NZERO, qSC_SSIZE_MAX, | |
qSC_SCHAR_MAX, qSC_SCHAR_MIN, qSC_SHRT_MAX, qSC_SHRT_MIN, | |
qSC_UCHAR_MAX, qSC_UINT_MAX, qSC_ULONG_MAX, qSC_USHRT_MAX, | |
qSC_NL_ARGMAX, qSC_NL_LANGMAX, qSC_NL_MSGMAX, qSC_NL_NMAX, | |
qSC_NL_SETMAX, qSC_NL_TEXTMAX, qSC_XBS5_ILP32_OFF32, | |
qSC_XBS5_ILP32_OFFBIG, qSC_XBS5_LP64_OFF64, qSC_XBS5_LPBIG_OFFBIG, | |
qSC_XOPEN_LEGACY, qSC_XOPEN_REALTIME, qSC_XOPEN_REALTIME_THREADS, | |
qSC_ADVISORY_INFO, qSC_BARRIERS, qSC_BASE, qSC_C_LANG_SUPPORT, | |
qSC_C_LANG_SUPPORT_R, qSC_CLOCK_SELECTION, qSC_CPUTIME, | |
qSC_THREAD_CPUTIME, qSC_DEVICE_IO, qSC_DEVICE_SPECIFIC, | |
qSC_DEVICE_SPECIFIC_R, qSC_FD_MGMT, qSC_FIFO, qSC_PIPE, | |
qSC_FILE_ATTRIBUTES, qSC_FILE_LOCKING, qSC_FILE_SYSTEM, | |
qSC_MONOTONIC_CLOCK, qSC_MULTI_PROCESS, qSC_SINGLE_PROCESS, | |
qSC_NETWORKING, qSC_READER_WRITER_LOCKS, qSC_SPIN_LOCKS, qSC_REGEXP, | |
qSC_REGEX_VERSION, qSC_SHELL, qSC_SIGNALS, qSC_SPAWN, | |
qSC_SPORADIC_SERVER, qSC_THREAD_SPORADIC_SERVER, qSC_SYSTEM_DATABASE, | |
qSC_SYSTEM_DATABASE_R, qSC_TIMEOUTS, qSC_TYPED_MEMORY_OBJECTS, | |
qSC_USER_GROUPS, qSC_USER_GROUPS_R, qSC_2_PBS, qSC_2_PBS_ACCOUNTING, | |
qSC_2_PBS_LOCATE, qSC_2_PBS_MESSAGE, qSC_2_PBS_TRACK, qSC_SYMLOOP_MAX, | |
qSC_STREAMS, qSC_2_PBS_CHECKPOINT, qSC_V6_ILP32_OFF32, | |
qSC_V6_ILP32_OFFBIG, qSC_V6_LP64_OFF64, qSC_V6_LPBIG_OFFBIG, | |
qSC_HOST_NAME_MAX, qSC_TRACE, qSC_TRACE_EVENT_FILTER, | |
qSC_TRACE_INHERIT, qSC_TRACE_LOG, qSC_LEVEL1_ICACHE_SIZE, | |
qSC_LEVEL1_ICACHE_ASSOC, qSC_LEVEL1_ICACHE_LINESIZE, | |
qSC_LEVEL1_DCACHE_SIZE, qSC_LEVEL1_DCACHE_ASSOC, | |
qSC_LEVEL1_DCACHE_LINESIZE, qSC_LEVEL2_CACHE_SIZE, | |
qSC_LEVEL2_CACHE_ASSOC, qSC_LEVEL2_CACHE_LINESIZE, | |
qSC_LEVEL3_CACHE_SIZE, qSC_LEVEL3_CACHE_ASSOC, | |
qSC_LEVEL3_CACHE_LINESIZE, qSC_LEVEL4_CACHE_SIZE, | |
qSC_LEVEL4_CACHE_ASSOC, qSC_LEVEL4_CACHE_LINESIZE, qSC_IPV6, | |
qSC_RAW_SOCKETS, qSC_V7_ILP32_OFF32, qSC_V7_ILP32_OFFBIG, | |
qSC_V7_LP64_OFF64, qSC_V7_LPBIG_OFFBIG, qSC_SS_REPL_MAX, | |
qSC_TRACE_EVENT_NAME_MAX, qSC_TRACE_NAME_MAX, qSC_TRACE_SYS_MAX, | |
qSC_TRACE_USER_EVENT_MAX, qSC_XOPEN_STREAMS, | |
qSC_THREAD_ROBUST_PRIO_INHERIT, qSC_THREAD_ROBUST_PRIO_PROTECT); | |
for enum_154a52aa use (qSC_ARG_MAX => 0, qSC_CHILD_MAX => 1, | |
qSC_CLK_TCK => 2, qSC_NGROUPS_MAX => 3, qSC_OPEN_MAX => 4, | |
qSC_STREAM_MAX => 5, qSC_TZNAME_MAX => 6, qSC_JOB_CONTROL => 7, | |
qSC_SAVED_IDS => 8, qSC_REALTIME_SIGNALS => 9, | |
qSC_PRIORITY_SCHEDULING => 10, qSC_TIMERS => 11, | |
qSC_ASYNCHRONOUS_IO => 12, qSC_PRIORITIZED_IO => 13, | |
qSC_SYNCHRONIZED_IO => 14, qSC_FSYNC => 15, qSC_MAPPED_FILES => 16, | |
qSC_MEMLOCK => 17, qSC_MEMLOCK_RANGE => 18, | |
qSC_MEMORY_PROTECTION => 19, qSC_MESSAGE_PASSING => 20, | |
qSC_SEMAPHORES => 21, qSC_SHARED_MEMORY_OBJECTS => 22, | |
qSC_AIO_LISTIO_MAX => 23, qSC_AIO_MAX => 24, | |
qSC_AIO_PRIO_DELTA_MAX => 25, qSC_DELAYTIMER_MAX => 26, | |
qSC_MQ_OPEN_MAX => 27, qSC_MQ_PRIO_MAX => 28, qSC_VERSION => 29, | |
qSC_PAGESIZE => 30, qSC_RTSIG_MAX => 31, qSC_SEM_NSEMS_MAX => 32, | |
qSC_SEM_VALUE_MAX => 33, qSC_SIGQUEUE_MAX => 34, qSC_TIMER_MAX => 35, | |
qSC_BC_BASE_MAX => 36, qSC_BC_DIM_MAX => 37, qSC_BC_SCALE_MAX => 38, | |
qSC_BC_STRING_MAX => 39, qSC_COLL_WEIGHTS_MAX => 40, | |
qSC_EQUIV_CLASS_MAX => 41, qSC_EXPR_NEST_MAX => 42, qSC_LINE_MAX => 43, | |
qSC_RE_DUP_MAX => 44, qSC_CHARCLASS_NAME_MAX => 45, | |
qSC_2_VERSION => 46, qSC_2_C_BIND => 47, qSC_2_C_DEV => 48, | |
qSC_2_FORT_DEV => 49, qSC_2_FORT_RUN => 50, qSC_2_SW_DEV => 51, | |
qSC_2_LOCALEDEF => 52, qSC_PII => 53, qSC_PII_XTI => 54, | |
qSC_PII_SOCKET => 55, qSC_PII_INTERNET => 56, qSC_PII_OSI => 57, | |
qSC_POLL => 58, qSC_SELECT => 59, qSC_UIO_MAXIOV => 60, | |
qSC_PII_INTERNET_STREAM => 61, qSC_PII_INTERNET_DGRAM => 62, | |
qSC_PII_OSI_COTS => 63, qSC_PII_OSI_CLTS => 64, qSC_PII_OSI_M => 65, | |
qSC_T_IOV_MAX => 66, qSC_THREADS => 67, | |
qSC_THREAD_SAFE_FUNCTIONS => 68, qSC_GETGR_R_SIZE_MAX => 69, | |
qSC_GETPW_R_SIZE_MAX => 70, qSC_LOGIN_NAME_MAX => 71, | |
qSC_TTY_NAME_MAX => 72, qSC_THREAD_DESTRUCTOR_ITERATIONS => 73, | |
qSC_THREAD_KEYS_MAX => 74, qSC_THREAD_STACK_MIN => 75, | |
qSC_THREAD_THREADS_MAX => 76, qSC_THREAD_ATTR_STACKADDR => 77, | |
qSC_THREAD_ATTR_STACKSIZE => 78, qSC_THREAD_PRIORITY_SCHEDULING => 79, | |
qSC_THREAD_PRIO_INHERIT => 80, qSC_THREAD_PRIO_PROTECT => 81, | |
qSC_THREAD_PROCESS_SHARED => 82, qSC_NPROCESSORS_CONF => 83, | |
qSC_NPROCESSORS_ONLN => 84, qSC_PHYS_PAGES => 85, | |
qSC_AVPHYS_PAGES => 86, qSC_ATEXIT_MAX => 87, qSC_PASS_MAX => 88, | |
qSC_XOPEN_VERSION => 89, qSC_XOPEN_XCU_VERSION => 90, | |
qSC_XOPEN_UNIX => 91, qSC_XOPEN_CRYPT => 92, qSC_XOPEN_ENH_I18N => 93, | |
qSC_XOPEN_SHM => 94, qSC_2_CHAR_TERM => 95, qSC_2_C_VERSION => 96, | |
qSC_2_UPE => 97, qSC_XOPEN_XPG2 => 98, qSC_XOPEN_XPG3 => 99, | |
qSC_XOPEN_XPG4 => 100, qSC_CHAR_BIT => 101, qSC_CHAR_MAX => 102, | |
qSC_CHAR_MIN => 103, qSC_INT_MAX => 104, qSC_INT_MIN => 105, | |
qSC_LONG_BIT => 106, qSC_WORD_BIT => 107, qSC_MB_LEN_MAX => 108, | |
qSC_NZERO => 109, qSC_SSIZE_MAX => 110, qSC_SCHAR_MAX => 111, | |
qSC_SCHAR_MIN => 112, qSC_SHRT_MAX => 113, qSC_SHRT_MIN => 114, | |
qSC_UCHAR_MAX => 115, qSC_UINT_MAX => 116, qSC_ULONG_MAX => 117, | |
qSC_USHRT_MAX => 118, qSC_NL_ARGMAX => 119, qSC_NL_LANGMAX => 120, | |
qSC_NL_MSGMAX => 121, qSC_NL_NMAX => 122, qSC_NL_SETMAX => 123, | |
qSC_NL_TEXTMAX => 124, qSC_XBS5_ILP32_OFF32 => 125, | |
qSC_XBS5_ILP32_OFFBIG => 126, qSC_XBS5_LP64_OFF64 => 127, | |
qSC_XBS5_LPBIG_OFFBIG => 128, qSC_XOPEN_LEGACY => 129, | |
qSC_XOPEN_REALTIME => 130, qSC_XOPEN_REALTIME_THREADS => 131, | |
qSC_ADVISORY_INFO => 132, qSC_BARRIERS => 133, qSC_BASE => 134, | |
qSC_C_LANG_SUPPORT => 135, qSC_C_LANG_SUPPORT_R => 136, | |
qSC_CLOCK_SELECTION => 137, qSC_CPUTIME => 138, | |
qSC_THREAD_CPUTIME => 139, qSC_DEVICE_IO => 140, | |
qSC_DEVICE_SPECIFIC => 141, qSC_DEVICE_SPECIFIC_R => 142, | |
qSC_FD_MGMT => 143, qSC_FIFO => 144, qSC_PIPE => 145, | |
qSC_FILE_ATTRIBUTES => 146, qSC_FILE_LOCKING => 147, | |
qSC_FILE_SYSTEM => 148, qSC_MONOTONIC_CLOCK => 149, | |
qSC_MULTI_PROCESS => 150, qSC_SINGLE_PROCESS => 151, | |
qSC_NETWORKING => 152, qSC_READER_WRITER_LOCKS => 153, | |
qSC_SPIN_LOCKS => 154, qSC_REGEXP => 155, qSC_REGEX_VERSION => 156, | |
qSC_SHELL => 157, qSC_SIGNALS => 158, qSC_SPAWN => 159, | |
qSC_SPORADIC_SERVER => 160, qSC_THREAD_SPORADIC_SERVER => 161, | |
qSC_SYSTEM_DATABASE => 162, qSC_SYSTEM_DATABASE_R => 163, | |
qSC_TIMEOUTS => 164, qSC_TYPED_MEMORY_OBJECTS => 165, | |
qSC_USER_GROUPS => 166, qSC_USER_GROUPS_R => 167, qSC_2_PBS => 168, | |
qSC_2_PBS_ACCOUNTING => 169, qSC_2_PBS_LOCATE => 170, | |
qSC_2_PBS_MESSAGE => 171, qSC_2_PBS_TRACK => 172, | |
qSC_SYMLOOP_MAX => 173, qSC_STREAMS => 174, | |
qSC_2_PBS_CHECKPOINT => 175, qSC_V6_ILP32_OFF32 => 176, | |
qSC_V6_ILP32_OFFBIG => 177, qSC_V6_LP64_OFF64 => 178, | |
qSC_V6_LPBIG_OFFBIG => 179, qSC_HOST_NAME_MAX => 180, qSC_TRACE => 181, | |
qSC_TRACE_EVENT_FILTER => 182, qSC_TRACE_INHERIT => 183, | |
qSC_TRACE_LOG => 184, qSC_LEVEL1_ICACHE_SIZE => 185, | |
qSC_LEVEL1_ICACHE_ASSOC => 186, qSC_LEVEL1_ICACHE_LINESIZE => 187, | |
qSC_LEVEL1_DCACHE_SIZE => 188, qSC_LEVEL1_DCACHE_ASSOC => 189, | |
qSC_LEVEL1_DCACHE_LINESIZE => 190, qSC_LEVEL2_CACHE_SIZE => 191, | |
qSC_LEVEL2_CACHE_ASSOC => 192, qSC_LEVEL2_CACHE_LINESIZE => 193, | |
qSC_LEVEL3_CACHE_SIZE => 194, qSC_LEVEL3_CACHE_ASSOC => 195, | |
qSC_LEVEL3_CACHE_LINESIZE => 196, qSC_LEVEL4_CACHE_SIZE => 197, | |
qSC_LEVEL4_CACHE_ASSOC => 198, qSC_LEVEL4_CACHE_LINESIZE => 199, | |
qSC_IPV6 => 235, qSC_RAW_SOCKETS => 236, qSC_V7_ILP32_OFF32 => 237, | |
qSC_V7_ILP32_OFFBIG => 238, qSC_V7_LP64_OFF64 => 239, | |
qSC_V7_LPBIG_OFFBIG => 240, qSC_SS_REPL_MAX => 241, | |
qSC_TRACE_EVENT_NAME_MAX => 242, qSC_TRACE_NAME_MAX => 243, | |
qSC_TRACE_SYS_MAX => 244, qSC_TRACE_USER_EVENT_MAX => 245, | |
qSC_XOPEN_STREAMS => 246, qSC_THREAD_ROBUST_PRIO_INHERIT => 247, | |
qSC_THREAD_ROBUST_PRIO_PROTECT => 248); | |
pragma Convention (C, enum_154a52aa); | |
function qSC_IOV_MAX return enum_154a52aa renames qSC_UIO_MAXIOV; | |
for enum_154a52aa'Size use signed_int'Size; | |
function Cast is new Ada.Unchecked_Conversion (enum_154a52aa, signed_int); | |
type enum_be9f31af is (qCS_PATH, qCS_V6_WIDTH_RESTRICTED_ENVS, | |
qCS_GNU_LIBC_VERSION, qCS_GNU_LIBPTHREAD_VERSION, | |
qCS_V5_WIDTH_RESTRICTED_ENVS, qCS_V7_WIDTH_RESTRICTED_ENVS, | |
qCS_LFS_CFLAGS, qCS_LFS_LDFLAGS, qCS_LFS_LIBS, qCS_LFS_LINTFLAGS, | |
qCS_LFS64_CFLAGS, qCS_LFS64_LDFLAGS, qCS_LFS64_LIBS, | |
qCS_LFS64_LINTFLAGS, qCS_XBS5_ILP32_OFF32_CFLAGS, | |
qCS_XBS5_ILP32_OFF32_LDFLAGS, qCS_XBS5_ILP32_OFF32_LIBS, | |
qCS_XBS5_ILP32_OFF32_LINTFLAGS, qCS_XBS5_ILP32_OFFBIG_CFLAGS, | |
qCS_XBS5_ILP32_OFFBIG_LDFLAGS, qCS_XBS5_ILP32_OFFBIG_LIBS, | |
qCS_XBS5_ILP32_OFFBIG_LINTFLAGS, qCS_XBS5_LP64_OFF64_CFLAGS, | |
qCS_XBS5_LP64_OFF64_LDFLAGS, qCS_XBS5_LP64_OFF64_LIBS, | |
qCS_XBS5_LP64_OFF64_LINTFLAGS, qCS_XBS5_LPBIG_OFFBIG_CFLAGS, | |
qCS_XBS5_LPBIG_OFFBIG_LDFLAGS, qCS_XBS5_LPBIG_OFFBIG_LIBS, | |
qCS_XBS5_LPBIG_OFFBIG_LINTFLAGS, qCS_POSIX_V6_ILP32_OFF32_CFLAGS, | |
qCS_POSIX_V6_ILP32_OFF32_LDFLAGS, qCS_POSIX_V6_ILP32_OFF32_LIBS, | |
qCS_POSIX_V6_ILP32_OFF32_LINTFLAGS, qCS_POSIX_V6_ILP32_OFFBIG_CFLAGS, | |
qCS_POSIX_V6_ILP32_OFFBIG_LDFLAGS, qCS_POSIX_V6_ILP32_OFFBIG_LIBS, | |
qCS_POSIX_V6_ILP32_OFFBIG_LINTFLAGS, qCS_POSIX_V6_LP64_OFF64_CFLAGS, | |
qCS_POSIX_V6_LP64_OFF64_LDFLAGS, qCS_POSIX_V6_LP64_OFF64_LIBS, | |
qCS_POSIX_V6_LP64_OFF64_LINTFLAGS, qCS_POSIX_V6_LPBIG_OFFBIG_CFLAGS, | |
qCS_POSIX_V6_LPBIG_OFFBIG_LDFLAGS, qCS_POSIX_V6_LPBIG_OFFBIG_LIBS, | |
qCS_POSIX_V6_LPBIG_OFFBIG_LINTFLAGS, qCS_POSIX_V7_ILP32_OFF32_CFLAGS, | |
qCS_POSIX_V7_ILP32_OFF32_LDFLAGS, qCS_POSIX_V7_ILP32_OFF32_LIBS, | |
qCS_POSIX_V7_ILP32_OFF32_LINTFLAGS, qCS_POSIX_V7_ILP32_OFFBIG_CFLAGS, | |
qCS_POSIX_V7_ILP32_OFFBIG_LDFLAGS, qCS_POSIX_V7_ILP32_OFFBIG_LIBS, | |
qCS_POSIX_V7_ILP32_OFFBIG_LINTFLAGS, qCS_POSIX_V7_LP64_OFF64_CFLAGS, | |
qCS_POSIX_V7_LP64_OFF64_LDFLAGS, qCS_POSIX_V7_LP64_OFF64_LIBS, | |
qCS_POSIX_V7_LP64_OFF64_LINTFLAGS, qCS_POSIX_V7_LPBIG_OFFBIG_CFLAGS, | |
qCS_POSIX_V7_LPBIG_OFFBIG_LDFLAGS, qCS_POSIX_V7_LPBIG_OFFBIG_LIBS, | |
qCS_POSIX_V7_LPBIG_OFFBIG_LINTFLAGS, qCS_V6_ENV, qCS_V7_ENV); | |
for enum_be9f31af use (qCS_PATH => 0, qCS_V6_WIDTH_RESTRICTED_ENVS => 1, | |
qCS_GNU_LIBC_VERSION => 2, qCS_GNU_LIBPTHREAD_VERSION => 3, | |
qCS_V5_WIDTH_RESTRICTED_ENVS => 4, qCS_V7_WIDTH_RESTRICTED_ENVS => 5, | |
qCS_LFS_CFLAGS => 1000, qCS_LFS_LDFLAGS => 1001, qCS_LFS_LIBS => 1002, | |
qCS_LFS_LINTFLAGS => 1003, qCS_LFS64_CFLAGS => 1004, | |
qCS_LFS64_LDFLAGS => 1005, qCS_LFS64_LIBS => 1006, | |
qCS_LFS64_LINTFLAGS => 1007, qCS_XBS5_ILP32_OFF32_CFLAGS => 1100, | |
qCS_XBS5_ILP32_OFF32_LDFLAGS => 1101, | |
qCS_XBS5_ILP32_OFF32_LIBS => 1102, | |
qCS_XBS5_ILP32_OFF32_LINTFLAGS => 1103, | |
qCS_XBS5_ILP32_OFFBIG_CFLAGS => 1104, | |
qCS_XBS5_ILP32_OFFBIG_LDFLAGS => 1105, | |
qCS_XBS5_ILP32_OFFBIG_LIBS => 1106, | |
qCS_XBS5_ILP32_OFFBIG_LINTFLAGS => 1107, | |
qCS_XBS5_LP64_OFF64_CFLAGS => 1108, | |
qCS_XBS5_LP64_OFF64_LDFLAGS => 1109, qCS_XBS5_LP64_OFF64_LIBS => 1110, | |
qCS_XBS5_LP64_OFF64_LINTFLAGS => 1111, | |
qCS_XBS5_LPBIG_OFFBIG_CFLAGS => 1112, | |
qCS_XBS5_LPBIG_OFFBIG_LDFLAGS => 1113, | |
qCS_XBS5_LPBIG_OFFBIG_LIBS => 1114, | |
qCS_XBS5_LPBIG_OFFBIG_LINTFLAGS => 1115, | |
qCS_POSIX_V6_ILP32_OFF32_CFLAGS => 1116, | |
qCS_POSIX_V6_ILP32_OFF32_LDFLAGS => 1117, | |
qCS_POSIX_V6_ILP32_OFF32_LIBS => 1118, | |
qCS_POSIX_V6_ILP32_OFF32_LINTFLAGS => 1119, | |
qCS_POSIX_V6_ILP32_OFFBIG_CFLAGS => 1120, | |
qCS_POSIX_V6_ILP32_OFFBIG_LDFLAGS => 1121, | |
qCS_POSIX_V6_ILP32_OFFBIG_LIBS => 1122, | |
qCS_POSIX_V6_ILP32_OFFBIG_LINTFLAGS => 1123, | |
qCS_POSIX_V6_LP64_OFF64_CFLAGS => 1124, | |
qCS_POSIX_V6_LP64_OFF64_LDFLAGS => 1125, | |
qCS_POSIX_V6_LP64_OFF64_LIBS => 1126, | |
qCS_POSIX_V6_LP64_OFF64_LINTFLAGS => 1127, | |
qCS_POSIX_V6_LPBIG_OFFBIG_CFLAGS => 1128, | |
qCS_POSIX_V6_LPBIG_OFFBIG_LDFLAGS => 1129, | |
qCS_POSIX_V6_LPBIG_OFFBIG_LIBS => 1130, | |
qCS_POSIX_V6_LPBIG_OFFBIG_LINTFLAGS => 1131, | |
qCS_POSIX_V7_ILP32_OFF32_CFLAGS => 1132, | |
qCS_POSIX_V7_ILP32_OFF32_LDFLAGS => 1133, | |
qCS_POSIX_V7_ILP32_OFF32_LIBS => 1134, | |
qCS_POSIX_V7_ILP32_OFF32_LINTFLAGS => 1135, | |
qCS_POSIX_V7_ILP32_OFFBIG_CFLAGS => 1136, | |
qCS_POSIX_V7_ILP32_OFFBIG_LDFLAGS => 1137, | |
qCS_POSIX_V7_ILP32_OFFBIG_LIBS => 1138, | |
qCS_POSIX_V7_ILP32_OFFBIG_LINTFLAGS => 1139, | |
qCS_POSIX_V7_LP64_OFF64_CFLAGS => 1140, | |
qCS_POSIX_V7_LP64_OFF64_LDFLAGS => 1141, | |
qCS_POSIX_V7_LP64_OFF64_LIBS => 1142, | |
qCS_POSIX_V7_LP64_OFF64_LINTFLAGS => 1143, | |
qCS_POSIX_V7_LPBIG_OFFBIG_CFLAGS => 1144, | |
qCS_POSIX_V7_LPBIG_OFFBIG_LDFLAGS => 1145, | |
qCS_POSIX_V7_LPBIG_OFFBIG_LIBS => 1146, | |
qCS_POSIX_V7_LPBIG_OFFBIG_LINTFLAGS => 1147, qCS_V6_ENV => 1148, | |
qCS_V7_ENV => 1149); | |
pragma Convention (C, enum_be9f31af); | |
for enum_be9f31af'Size use signed_int'Size; | |
function Cast is new Ada.Unchecked_Conversion (enum_be9f31af, signed_int); | |
-- _CS_GNU_LIBC_VERSION (repeating itself) | |
-- _CS_GNU_LIBPTHREAD_VERSION (repeating itself) | |
-- _CS_LFS64_CFLAGS (repeating itself) | |
-- _CS_LFS64_LDFLAGS (repeating itself) | |
-- _CS_LFS64_LIBS (repeating itself) | |
-- _CS_LFS64_LINTFLAGS (repeating itself) | |
-- _CS_LFS_CFLAGS (repeating itself) | |
-- _CS_LFS_LDFLAGS (repeating itself) | |
-- _CS_LFS_LIBS (repeating itself) | |
-- _CS_LFS_LINTFLAGS (repeating itself) | |
-- _CS_PATH (repeating itself) | |
-- _CS_POSIX_V5_WIDTH_RESTRICTED_ENVS (repeating itself) | |
-- _CS_POSIX_V6_ILP32_OFF32_CFLAGS (repeating itself) | |
-- _CS_POSIX_V6_ILP32_OFF32_LDFLAGS (repeating itself) | |
-- _CS_POSIX_V6_ILP32_OFF32_LIBS (repeating itself) | |
-- _CS_POSIX_V6_ILP32_OFF32_LINTFLAGS (repeating itself) | |
-- _CS_POSIX_V6_ILP32_OFFBIG_CFLAGS (repeating itself) | |
-- _CS_POSIX_V6_ILP32_OFFBIG_LDFLAGS (repeating itself) | |
-- _CS_POSIX_V6_ILP32_OFFBIG_LIBS (repeating itself) | |
-- _CS_POSIX_V6_ILP32_OFFBIG_LINTFLAGS (repeating itself) | |
-- _CS_POSIX_V6_LP64_OFF64_CFLAGS (repeating itself) | |
-- _CS_POSIX_V6_LP64_OFF64_LDFLAGS (repeating itself) | |
-- _CS_POSIX_V6_LP64_OFF64_LIBS (repeating itself) | |
-- _CS_POSIX_V6_LP64_OFF64_LINTFLAGS (repeating itself) | |
-- _CS_POSIX_V6_LPBIG_OFFBIG_CFLAGS (repeating itself) | |
-- _CS_POSIX_V6_LPBIG_OFFBIG_LDFLAGS (repeating itself) | |
-- _CS_POSIX_V6_LPBIG_OFFBIG_LIBS (repeating itself) | |
-- _CS_POSIX_V6_LPBIG_OFFBIG_LINTFLAGS (repeating itself) | |
-- _CS_POSIX_V6_WIDTH_RESTRICTED_ENVS (repeating itself) | |
-- _CS_POSIX_V7_ILP32_OFF32_CFLAGS (repeating itself) | |
-- _CS_POSIX_V7_ILP32_OFF32_LDFLAGS (repeating itself) | |
-- _CS_POSIX_V7_ILP32_OFF32_LIBS (repeating itself) | |
-- _CS_POSIX_V7_ILP32_OFF32_LINTFLAGS (repeating itself) | |
-- _CS_POSIX_V7_ILP32_OFFBIG_CFLAGS (repeating itself) | |
-- _CS_POSIX_V7_ILP32_OFFBIG_LDFLAGS (repeating itself) | |
-- _CS_POSIX_V7_ILP32_OFFBIG_LIBS (repeating itself) | |
-- _CS_POSIX_V7_ILP32_OFFBIG_LINTFLAGS (repeating itself) | |
-- _CS_POSIX_V7_LP64_OFF64_CFLAGS (repeating itself) | |
-- _CS_POSIX_V7_LP64_OFF64_LDFLAGS (repeating itself) | |
-- _CS_POSIX_V7_LP64_OFF64_LIBS (repeating itself) | |
-- _CS_POSIX_V7_LP64_OFF64_LINTFLAGS (repeating itself) | |
-- _CS_POSIX_V7_LPBIG_OFFBIG_CFLAGS (repeating itself) | |
-- _CS_POSIX_V7_LPBIG_OFFBIG_LDFLAGS (repeating itself) | |
-- _CS_POSIX_V7_LPBIG_OFFBIG_LIBS (repeating itself) | |
-- _CS_POSIX_V7_LPBIG_OFFBIG_LINTFLAGS (repeating itself) | |
-- _CS_POSIX_V7_WIDTH_RESTRICTED_ENVS (repeating itself) | |
-- _CS_V5_WIDTH_RESTRICTED_ENVS (repeating itself) | |
-- _CS_V6_ENV (repeating itself) | |
-- _CS_V6_WIDTH_RESTRICTED_ENVS (repeating itself) | |
-- _CS_V7_ENV (repeating itself) | |
-- _CS_V7_WIDTH_RESTRICTED_ENVS (repeating itself) | |
-- _CS_XBS5_ILP32_OFF32_CFLAGS (repeating itself) | |
-- _CS_XBS5_ILP32_OFF32_LDFLAGS (repeating itself) | |
-- _CS_XBS5_ILP32_OFF32_LIBS (repeating itself) | |
-- _CS_XBS5_ILP32_OFF32_LINTFLAGS (repeating itself) | |
-- _CS_XBS5_ILP32_OFFBIG_CFLAGS (repeating itself) | |
-- _CS_XBS5_ILP32_OFFBIG_LDFLAGS (repeating itself) | |
-- _CS_XBS5_ILP32_OFFBIG_LIBS (repeating itself) | |
-- _CS_XBS5_ILP32_OFFBIG_LINTFLAGS (repeating itself) | |
-- _CS_XBS5_LP64_OFF64_CFLAGS (repeating itself) | |
-- _CS_XBS5_LP64_OFF64_LDFLAGS (repeating itself) | |
-- _CS_XBS5_LP64_OFF64_LIBS (repeating itself) | |
-- _CS_XBS5_LP64_OFF64_LINTFLAGS (repeating itself) | |
-- _CS_XBS5_LPBIG_OFFBIG_CFLAGS (repeating itself) | |
-- _CS_XBS5_LPBIG_OFFBIG_LDFLAGS (repeating itself) | |
-- _CS_XBS5_LPBIG_OFFBIG_LIBS (repeating itself) | |
-- _CS_XBS5_LPBIG_OFFBIG_LINTFLAGS (repeating itself) | |
-- _PC_2_SYMLINKS (repeating itself) | |
-- _PC_ALLOC_SIZE_MIN (repeating itself) | |
-- _PC_ASYNC_IO (repeating itself) | |
-- _PC_CHOWN_RESTRICTED (repeating itself) | |
-- _PC_FILESIZEBITS (repeating itself) | |
-- _PC_LINK_MAX (repeating itself) | |
-- _PC_MAX_CANON (repeating itself) | |
-- _PC_MAX_INPUT (repeating itself) | |
-- _PC_NAME_MAX (repeating itself) | |
-- _PC_NO_TRUNC (repeating itself) | |
-- _PC_PATH_MAX (repeating itself) | |
-- _PC_PIPE_BUF (repeating itself) | |
-- _PC_PRIO_IO (repeating itself) | |
-- _PC_REC_INCR_XFER_SIZE (repeating itself) | |
-- _PC_REC_MAX_XFER_SIZE (repeating itself) | |
-- _PC_REC_MIN_XFER_SIZE (repeating itself) | |
-- _PC_REC_XFER_ALIGN (repeating itself) | |
-- _PC_SOCK_MAXBUF (repeating itself) | |
-- _PC_SYMLINK_MAX (repeating itself) | |
-- _PC_SYNC_IO (repeating itself) | |
-- _PC_VDISABLE (repeating itself) | |
-- _SC_2_CHAR_TERM (repeating itself) | |
-- _SC_2_C_BIND (repeating itself) | |
-- _SC_2_C_DEV (repeating itself) | |
-- _SC_2_C_VERSION (repeating itself) | |
-- _SC_2_FORT_DEV (repeating itself) | |
-- _SC_2_FORT_RUN (repeating itself) | |
-- _SC_2_LOCALEDEF (repeating itself) | |
-- _SC_2_PBS (repeating itself) | |
-- _SC_2_PBS_ACCOUNTING (repeating itself) | |
-- _SC_2_PBS_CHECKPOINT (repeating itself) | |
-- _SC_2_PBS_LOCATE (repeating itself) | |
-- _SC_2_PBS_MESSAGE (repeating itself) | |
-- _SC_2_PBS_TRACK (repeating itself) | |
-- _SC_2_SW_DEV (repeating itself) | |
-- _SC_2_UPE (repeating itself) | |
-- _SC_2_VERSION (repeating itself) | |
-- _SC_ADVISORY_INFO (repeating itself) | |
-- _SC_AIO_LISTIO_MAX (repeating itself) | |
-- _SC_AIO_MAX (repeating itself) | |
-- _SC_AIO_PRIO_DELTA_MAX (repeating itself) | |
-- _SC_ARG_MAX (repeating itself) | |
-- _SC_ASYNCHRONOUS_IO (repeating itself) | |
-- _SC_ATEXIT_MAX (repeating itself) | |
-- _SC_AVPHYS_PAGES (repeating itself) | |
-- _SC_BARRIERS (repeating itself) | |
-- _SC_BASE (repeating itself) | |
-- _SC_BC_BASE_MAX (repeating itself) | |
-- _SC_BC_DIM_MAX (repeating itself) | |
-- _SC_BC_SCALE_MAX (repeating itself) | |
-- _SC_BC_STRING_MAX (repeating itself) | |
-- _SC_CHARCLASS_NAME_MAX (repeating itself) | |
-- _SC_CHAR_BIT (repeating itself) | |
-- _SC_CHAR_MAX (repeating itself) | |
-- _SC_CHAR_MIN (repeating itself) | |
-- _SC_CHILD_MAX (repeating itself) | |
-- _SC_CLK_TCK (repeating itself) | |
-- _SC_CLOCK_SELECTION (repeating itself) | |
-- _SC_COLL_WEIGHTS_MAX (repeating itself) | |
-- _SC_CPUTIME (repeating itself) | |
-- _SC_C_LANG_SUPPORT (repeating itself) | |
-- _SC_C_LANG_SUPPORT_R (repeating itself) | |
-- _SC_DELAYTIMER_MAX (repeating itself) | |
-- _SC_DEVICE_IO (repeating itself) | |
-- _SC_DEVICE_SPECIFIC (repeating itself) | |
-- _SC_DEVICE_SPECIFIC_R (repeating itself) | |
-- _SC_EQUIV_CLASS_MAX (repeating itself) | |
-- _SC_EXPR_NEST_MAX (repeating itself) | |
-- _SC_FD_MGMT (repeating itself) | |
-- _SC_FIFO (repeating itself) | |
-- _SC_FILE_ATTRIBUTES (repeating itself) | |
-- _SC_FILE_LOCKING (repeating itself) | |
-- _SC_FILE_SYSTEM (repeating itself) | |
-- _SC_FSYNC (repeating itself) | |
-- _SC_GETGR_R_SIZE_MAX (repeating itself) | |
-- _SC_GETPW_R_SIZE_MAX (repeating itself) | |
-- _SC_HOST_NAME_MAX (repeating itself) | |
-- _SC_INT_MAX (repeating itself) | |
-- _SC_INT_MIN (repeating itself) | |
-- _SC_IOV_MAX (repeating itself) | |
-- _SC_IPV6 (repeating itself) | |
-- _SC_JOB_CONTROL (repeating itself) | |
-- _SC_LEVEL1_DCACHE_ASSOC (repeating itself) | |
-- _SC_LEVEL1_DCACHE_LINESIZE (repeating itself) | |
-- _SC_LEVEL1_DCACHE_SIZE (repeating itself) | |
-- _SC_LEVEL1_ICACHE_ASSOC (repeating itself) | |
-- _SC_LEVEL1_ICACHE_LINESIZE (repeating itself) | |
-- _SC_LEVEL1_ICACHE_SIZE (repeating itself) | |
-- _SC_LEVEL2_CACHE_ASSOC (repeating itself) | |
-- _SC_LEVEL2_CACHE_LINESIZE (repeating itself) | |
-- _SC_LEVEL2_CACHE_SIZE (repeating itself) | |
-- _SC_LEVEL3_CACHE_ASSOC (repeating itself) | |
-- _SC_LEVEL3_CACHE_LINESIZE (repeating itself) | |
-- _SC_LEVEL3_CACHE_SIZE (repeating itself) | |
-- _SC_LEVEL4_CACHE_ASSOC (repeating itself) | |
-- _SC_LEVEL4_CACHE_LINESIZE (repeating itself) | |
-- _SC_LEVEL4_CACHE_SIZE (repeating itself) | |
-- _SC_LINE_MAX (repeating itself) | |
-- _SC_LOGIN_NAME_MAX (repeating itself) | |
-- _SC_LONG_BIT (repeating itself) | |
-- _SC_MAPPED_FILES (repeating itself) | |
-- _SC_MB_LEN_MAX (repeating itself) | |
-- _SC_MEMLOCK (repeating itself) | |
-- _SC_MEMLOCK_RANGE (repeating itself) | |
-- _SC_MEMORY_PROTECTION (repeating itself) | |
-- _SC_MESSAGE_PASSING (repeating itself) | |
-- _SC_MONOTONIC_CLOCK (repeating itself) | |
-- _SC_MQ_OPEN_MAX (repeating itself) | |
-- _SC_MQ_PRIO_MAX (repeating itself) | |
-- _SC_MULTI_PROCESS (repeating itself) | |
-- _SC_NETWORKING (repeating itself) | |
-- _SC_NGROUPS_MAX (repeating itself) | |
-- _SC_NL_ARGMAX (repeating itself) | |
-- _SC_NL_LANGMAX (repeating itself) | |
-- _SC_NL_MSGMAX (repeating itself) | |
-- _SC_NL_NMAX (repeating itself) | |
-- _SC_NL_SETMAX (repeating itself) | |
-- _SC_NL_TEXTMAX (repeating itself) | |
-- _SC_NPROCESSORS_CONF (repeating itself) | |
-- _SC_NPROCESSORS_ONLN (repeating itself) | |
-- _SC_NZERO (repeating itself) | |
-- _SC_OPEN_MAX (repeating itself) | |
-- _SC_PAGESIZE (repeating itself) | |
-- _SC_PAGE_SIZE (repeating itself) | |
-- _SC_PASS_MAX (repeating itself) | |
-- _SC_PHYS_PAGES (repeating itself) | |
-- _SC_PII (repeating itself) | |
-- _SC_PII_INTERNET (repeating itself) | |
-- _SC_PII_INTERNET_DGRAM (repeating itself) | |
-- _SC_PII_INTERNET_STREAM (repeating itself) | |
-- _SC_PII_OSI (repeating itself) | |
-- _SC_PII_OSI_CLTS (repeating itself) | |
-- _SC_PII_OSI_COTS (repeating itself) | |
-- _SC_PII_OSI_M (repeating itself) | |
-- _SC_PII_SOCKET (repeating itself) | |
-- _SC_PII_XTI (repeating itself) | |
-- _SC_PIPE (repeating itself) | |
-- _SC_POLL (repeating itself) | |
-- _SC_PRIORITIZED_IO (repeating itself) | |
-- _SC_PRIORITY_SCHEDULING (repeating itself) | |
-- _SC_RAW_SOCKETS (repeating itself) | |
-- _SC_READER_WRITER_LOCKS (repeating itself) | |
-- _SC_REALTIME_SIGNALS (repeating itself) | |
-- _SC_REGEXP (repeating itself) | |
-- _SC_REGEX_VERSION (repeating itself) | |
-- _SC_RE_DUP_MAX (repeating itself) | |
-- _SC_RTSIG_MAX (repeating itself) | |
-- _SC_SAVED_IDS (repeating itself) | |
-- _SC_SCHAR_MAX (repeating itself) | |
-- _SC_SCHAR_MIN (repeating itself) | |
-- _SC_SELECT (repeating itself) | |
-- _SC_SEMAPHORES (repeating itself) | |
-- _SC_SEM_NSEMS_MAX (repeating itself) | |
-- _SC_SEM_VALUE_MAX (repeating itself) | |
-- _SC_SHARED_MEMORY_OBJECTS (repeating itself) | |
-- _SC_SHELL (repeating itself) | |
-- _SC_SHRT_MAX (repeating itself) | |
-- _SC_SHRT_MIN (repeating itself) | |
-- _SC_SIGNALS (repeating itself) | |
-- _SC_SIGQUEUE_MAX (repeating itself) | |
-- _SC_SINGLE_PROCESS (repeating itself) | |
-- _SC_SPAWN (repeating itself) | |
-- _SC_SPIN_LOCKS (repeating itself) | |
-- _SC_SPORADIC_SERVER (repeating itself) | |
-- _SC_SSIZE_MAX (repeating itself) | |
-- _SC_SS_REPL_MAX (repeating itself) | |
-- _SC_STREAMS (repeating itself) | |
-- _SC_STREAM_MAX (repeating itself) | |
-- _SC_SYMLOOP_MAX (repeating itself) | |
-- _SC_SYNCHRONIZED_IO (repeating itself) | |
-- _SC_SYSTEM_DATABASE (repeating itself) | |
-- _SC_SYSTEM_DATABASE_R (repeating itself) | |
-- _SC_THREADS (repeating itself) | |
-- _SC_THREAD_ATTR_STACKADDR (repeating itself) | |
-- _SC_THREAD_ATTR_STACKSIZE (repeating itself) | |
-- _SC_THREAD_CPUTIME (repeating itself) | |
-- _SC_THREAD_DESTRUCTOR_ITERATIONS (repeating itself) | |
-- _SC_THREAD_KEYS_MAX (repeating itself) | |
-- _SC_THREAD_PRIORITY_SCHEDULING (repeating itself) | |
-- _SC_THREAD_PRIO_INHERIT (repeating itself) | |
-- _SC_THREAD_PRIO_PROTECT (repeating itself) | |
-- _SC_THREAD_PROCESS_SHARED (repeating itself) | |
-- _SC_THREAD_ROBUST_PRIO_INHERIT (repeating itself) | |
-- _SC_THREAD_ROBUST_PRIO_PROTECT (repeating itself) | |
-- _SC_THREAD_SAFE_FUNCTIONS (repeating itself) | |
-- _SC_THREAD_SPORADIC_SERVER (repeating itself) | |
-- _SC_THREAD_STACK_MIN (repeating itself) | |
-- _SC_THREAD_THREADS_MAX (repeating itself) | |
-- _SC_TIMEOUTS (repeating itself) | |
-- _SC_TIMERS (repeating itself) | |
-- _SC_TIMER_MAX (repeating itself) | |
-- _SC_TRACE (repeating itself) | |
-- _SC_TRACE_EVENT_FILTER (repeating itself) | |
-- _SC_TRACE_EVENT_NAME_MAX (repeating itself) | |
-- _SC_TRACE_INHERIT (repeating itself) | |
-- _SC_TRACE_LOG (repeating itself) | |
-- _SC_TRACE_NAME_MAX (repeating itself) | |
-- _SC_TRACE_SYS_MAX (repeating itself) | |
-- _SC_TRACE_USER_EVENT_MAX (repeating itself) | |
-- _SC_TTY_NAME_MAX (repeating itself) | |
-- _SC_TYPED_MEMORY_OBJECTS (repeating itself) | |
-- _SC_TZNAME_MAX (repeating itself) | |
-- _SC_T_IOV_MAX (repeating itself) | |
-- _SC_UCHAR_MAX (repeating itself) | |
-- _SC_UINT_MAX (repeating itself) | |
-- _SC_UIO_MAXIOV (repeating itself) | |
-- _SC_ULONG_MAX (repeating itself) | |
-- _SC_USER_GROUPS (repeating itself) | |
-- _SC_USER_GROUPS_R (repeating itself) | |
-- _SC_USHRT_MAX (repeating itself) | |
-- _SC_V6_ILP32_OFF32 (repeating itself) | |
-- _SC_V6_ILP32_OFFBIG (repeating itself) | |
-- _SC_V6_LP64_OFF64 (repeating itself) | |
-- _SC_V6_LPBIG_OFFBIG (repeating itself) | |
-- _SC_V7_ILP32_OFF32 (repeating itself) | |
-- _SC_V7_ILP32_OFFBIG (repeating itself) | |
-- _SC_V7_LP64_OFF64 (repeating itself) | |
-- _SC_V7_LPBIG_OFFBIG (repeating itself) | |
-- _SC_VERSION (repeating itself) | |
-- _SC_WORD_BIT (repeating itself) | |
-- _SC_XBS5_ILP32_OFF32 (repeating itself) | |
-- _SC_XBS5_ILP32_OFFBIG (repeating itself) | |
-- _SC_XBS5_LP64_OFF64 (repeating itself) | |
-- _SC_XBS5_LPBIG_OFFBIG (repeating itself) | |
-- _SC_XOPEN_CRYPT (repeating itself) | |
-- _SC_XOPEN_ENH_I18N (repeating itself) | |
-- _SC_XOPEN_LEGACY (repeating itself) | |
-- _SC_XOPEN_REALTIME (repeating itself) | |
-- _SC_XOPEN_REALTIME_THREADS (repeating itself) | |
-- _SC_XOPEN_SHM (repeating itself) | |
-- _SC_XOPEN_STREAMS (repeating itself) | |
-- _SC_XOPEN_UNIX (repeating itself) | |
-- _SC_XOPEN_VERSION (repeating itself) | |
-- _SC_XOPEN_XCU_VERSION (repeating itself) | |
-- _SC_XOPEN_XPG2 (repeating itself) | |
-- _SC_XOPEN_XPG3 (repeating itself) | |
-- _SC_XOPEN_XPG4 (repeating itself) | |
end C.bits.confname; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.bits.endian is | |
pragma Preelaborate; | |
BYTE_ORDER : constant := 1234; | |
end C.bits.endian; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.bits.environments is | |
pragma Preelaborate; | |
POSIX_V6_LP64_OFF64 : constant := 1; | |
POSIX_V6_LPBIG_OFFBIG : constant := -1; | |
POSIX_V7_LP64_OFF64 : constant := 1; | |
POSIX_V7_LPBIG_OFFBIG : constant := -1; | |
XBS5_LP64_OFF64 : constant := 1; | |
XBS5_LPBIG_OFFBIG : constant := -1; | |
ILP32_OFF32_CFLAGS : constant char_array (0 .. 4) := "-m32" | |
& char'Val (0); | |
ILP32_OFF32_LDFLAGS : constant char_array (0 .. 4) := "-m32" | |
& char'Val (0); | |
ILP32_OFFBIG_CFLAGS : constant char_array (0 .. 47) := | |
"-m32 -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64" & char'Val (0); | |
ILP32_OFFBIG_LDFLAGS : constant char_array (0 .. 4) := "-m32" | |
& char'Val (0); | |
LP64_OFF64_CFLAGS : constant char_array (0 .. 4) := "-m64" & char'Val (0); | |
LP64_OFF64_LDFLAGS : constant char_array (0 .. 4) := "-m64" | |
& char'Val (0); | |
end C.bits.environments; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.bits.local_lim is | |
pragma Preelaborate; | |
AIO_PRIO_DELTA_MAX : constant := 20; | |
DELAYTIMER_MAX : constant := 2147483647; | |
HOST_NAME_MAX : constant := 64; | |
LOGIN_NAME_MAX : constant := 256; | |
MQ_PRIO_MAX : constant := 32768; | |
PTHREAD_DESTRUCTOR_ITERATIONS : constant := 4; | |
PTHREAD_KEYS_MAX : constant := 1024; | |
PTHREAD_STACK_MIN : constant := 16384; | |
SEM_VALUE_MAX : constant := 2147483647; | |
TTY_NAME_MAX : constant := 32; | |
POSIX_THREAD_DESTRUCTOR_ITERATIONS : constant := 4; | |
POSIX_THREAD_KEYS_MAX : constant := 128; | |
POSIX_THREAD_THREADS_MAX : constant := 64; | |
end C.bits.local_lim; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.bits.posix1_lim is | |
pragma Preelaborate; | |
SSIZE_MAX : constant := 9223372036854775807; | |
BITS_POSIX1_LIM_H : constant := 1; | |
POSIX_AIO_LISTIO_MAX : constant := 2; | |
POSIX_AIO_MAX : constant := 1; | |
POSIX_ARG_MAX : constant := 4096; | |
POSIX_CHILD_MAX : constant := 25; | |
POSIX_CLOCKRES_MIN : constant := 20000000; | |
POSIX_DELAYTIMER_MAX : constant := 32; | |
POSIX_HOST_NAME_MAX : constant := 255; | |
POSIX_LINK_MAX : constant := 8; | |
POSIX_LOGIN_NAME_MAX : constant := 9; | |
POSIX_MAX_CANON : constant := 255; | |
POSIX_MAX_INPUT : constant := 255; | |
POSIX_MQ_OPEN_MAX : constant := 8; | |
POSIX_MQ_PRIO_MAX : constant := 32; | |
POSIX_NAME_MAX : constant := 14; | |
POSIX_NGROUPS_MAX : constant := 8; | |
POSIX_OPEN_MAX : constant := 20; | |
POSIX_PATH_MAX : constant := 256; | |
POSIX_PIPE_BUF : constant := 512; | |
POSIX_RE_DUP_MAX : constant := 255; | |
POSIX_RTSIG_MAX : constant := 8; | |
POSIX_SEM_NSEMS_MAX : constant := 256; | |
POSIX_SEM_VALUE_MAX : constant := 32767; | |
POSIX_SIGQUEUE_MAX : constant := 32; | |
POSIX_SSIZE_MAX : constant := 32767; | |
POSIX_STREAM_MAX : constant := 8; | |
POSIX_SYMLINK_MAX : constant := 255; | |
POSIX_SYMLOOP_MAX : constant := 8; | |
POSIX_TIMER_MAX : constant := 32; | |
POSIX_TTY_NAME_MAX : constant := 9; | |
POSIX_TZNAME_MAX : constant := 6; | |
end C.bits.posix1_lim; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.bits.posix2_lim is | |
pragma Preelaborate; | |
BC_BASE_MAX : constant := 99; | |
BC_DIM_MAX : constant := 2048; | |
BC_SCALE_MAX : constant := 99; | |
BC_STRING_MAX : constant := 1000; | |
CHARCLASS_NAME_MAX : constant := 2048; | |
COLL_WEIGHTS_MAX : constant := 255; | |
EXPR_NEST_MAX : constant := 32; | |
LINE_MAX : constant := 2048; | |
RE_DUP_MAX : constant := 32767; | |
BITS_POSIX2_LIM_H : constant := 1; | |
POSIX2_BC_BASE_MAX : constant := 99; | |
POSIX2_BC_DIM_MAX : constant := 2048; | |
POSIX2_BC_SCALE_MAX : constant := 99; | |
POSIX2_BC_STRING_MAX : constant := 1000; | |
POSIX2_CHARCLASS_NAME_MAX : constant := 14; | |
POSIX2_COLL_WEIGHTS_MAX : constant := 2; | |
POSIX2_EXPR_NEST_MAX : constant := 32; | |
POSIX2_LINE_MAX : constant := 2048; | |
POSIX2_RE_DUP_MAX : constant := 255; | |
end C.bits.posix2_lim; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.bits.posix_opt is | |
pragma Preelaborate; | |
BITS_POSIX_OPT_H : constant := 1; | |
LFS64_ASYNCHRONOUS_IO : constant := 1; | |
LFS64_LARGEFILE : constant := 1; | |
LFS64_STDIO : constant := 1; | |
LFS_ASYNCHRONOUS_IO : constant := 1; | |
LFS_LARGEFILE : constant := 1; | |
POSIX2_CHAR_TERM : constant := 200809; | |
POSIX_ADVISORY_INFO : constant := 200809; | |
POSIX_ASYNCHRONOUS_IO : constant := 200809; | |
POSIX_ASYNC_IO : constant := 1; | |
POSIX_BARRIERS : constant := 200809; | |
POSIX_CHOWN_RESTRICTED : constant := 0; | |
POSIX_CLOCK_SELECTION : constant := 200809; | |
POSIX_CPUTIME : constant := 0; | |
POSIX_FSYNC : constant := 200809; | |
POSIX_IPV6 : constant := 200809; | |
POSIX_JOB_CONTROL : constant := 1; | |
POSIX_MAPPED_FILES : constant := 200809; | |
POSIX_MEMLOCK : constant := 200809; | |
POSIX_MEMLOCK_RANGE : constant := 200809; | |
POSIX_MEMORY_PROTECTION : constant := 200809; | |
POSIX_MESSAGE_PASSING : constant := 200809; | |
POSIX_MONOTONIC_CLOCK : constant := 0; | |
POSIX_NO_TRUNC : constant := 1; | |
POSIX_PRIORITIZED_IO : constant := 200809; | |
POSIX_PRIORITY_SCHEDULING : constant := 200809; | |
POSIX_RAW_SOCKETS : constant := 200809; | |
POSIX_READER_WRITER_LOCKS : constant := 200809; | |
POSIX_REALTIME_SIGNALS : constant := 200809; | |
POSIX_REENTRANT_FUNCTIONS : constant := 1; | |
POSIX_REGEXP : constant := 1; | |
POSIX_SAVED_IDS : constant := 1; | |
POSIX_SEMAPHORES : constant := 200809; | |
POSIX_SHARED_MEMORY_OBJECTS : constant := 200809; | |
POSIX_SHELL : constant := 1; | |
POSIX_SPAWN : constant := 200809; | |
POSIX_SPIN_LOCKS : constant := 200809; | |
POSIX_SPORADIC_SERVER : constant := -1; | |
POSIX_SYNCHRONIZED_IO : constant := 200809; | |
POSIX_THREADS : constant := 200809; | |
POSIX_THREAD_ATTR_STACKADDR : constant := 200809; | |
POSIX_THREAD_ATTR_STACKSIZE : constant := 200809; | |
POSIX_THREAD_CPUTIME : constant := 0; | |
POSIX_THREAD_PRIORITY_SCHEDULING : constant := 200809; | |
POSIX_THREAD_PRIO_INHERIT : constant := 200809; | |
POSIX_THREAD_PRIO_PROTECT : constant := 200809; | |
POSIX_THREAD_PROCESS_SHARED : constant := 200809; | |
POSIX_THREAD_ROBUST_PRIO_INHERIT : constant := 200809; | |
POSIX_THREAD_ROBUST_PRIO_PROTECT : constant := -1; | |
POSIX_THREAD_SAFE_FUNCTIONS : constant := 200809; | |
POSIX_THREAD_SPORADIC_SERVER : constant := -1; | |
POSIX_TIMEOUTS : constant := 200809; | |
POSIX_TIMERS : constant := 200809; | |
POSIX_TRACE : constant := -1; | |
POSIX_TRACE_EVENT_FILTER : constant := -1; | |
POSIX_TRACE_INHERIT : constant := -1; | |
POSIX_TRACE_LOG : constant := -1; | |
POSIX_TYPED_MEMORY_OBJECTS : constant := -1; | |
POSIX_VDISABLE : constant char := char'Val (0); | |
XOPEN_REALTIME : constant := 1; | |
XOPEN_REALTIME_THREADS : constant := 1; | |
XOPEN_SHM : constant := 1; | |
end C.bits.posix_opt; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.bits.pthreadtypes is | |
pragma Preelaborate; | |
subtype pthread_t is unsigned_long; | |
type union_pthread_attr_t; | |
type union_pthread_attr_t (Unchecked_Tag : unsigned_int := 0) is record | |
case Unchecked_Tag is | |
when 0 => | |
size : char_array (0 .. 55); | |
when others => | |
align : signed_long; | |
end case; | |
end record; | |
pragma Unchecked_Union (union_pthread_attr_t); | |
pragma Convention (C_Pass_By_Copy, union_pthread_attr_t); | |
subtype pthread_attr_t is union_pthread_attr_t; | |
type struct_pthread_internal_list; | |
type struct_pthread_internal_list_ptr is | |
access all struct_pthread_internal_list; | |
for struct_pthread_internal_list_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_pthread_internal_list_ptr); | |
pragma Convention (C, struct_pthread_internal_list_ptr); | |
type struct_pthread_internal_list is record | |
prev : aliased struct_pthread_internal_list_ptr; | |
next : aliased struct_pthread_internal_list_ptr; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_pthread_internal_list); | |
subtype pthread_list_t is struct_pthread_internal_list; | |
type struct_pthread_mutex_s; | |
type struct_pthread_mutex_s is record | |
lock : aliased signed_int; | |
count : aliased unsigned_int; | |
owner : aliased signed_int; | |
nusers : aliased unsigned_int; | |
kind : aliased signed_int; | |
spins : aliased signed_short; | |
elision : aliased signed_short; | |
list : aliased pthread_list_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_pthread_mutex_s); | |
type union_3e18a114 (Unchecked_Tag : unsigned_int := 0) is record | |
case Unchecked_Tag is | |
when 0 => | |
data : struct_pthread_mutex_s; | |
when 1 => | |
size : char_array (0 .. 39); | |
when others => | |
align : signed_long; | |
end case; | |
end record; | |
pragma Unchecked_Union (union_3e18a114); | |
pragma Convention (C_Pass_By_Copy, union_3e18a114); | |
subtype pthread_mutex_t is union_3e18a114; | |
type union_2d30f3ed (Unchecked_Tag : unsigned_int := 0) is record | |
case Unchecked_Tag is | |
when 0 => | |
size : char_array (0 .. 3); | |
when others => | |
align : signed_int; | |
end case; | |
end record; | |
pragma Unchecked_Union (union_2d30f3ed); | |
pragma Convention (C_Pass_By_Copy, union_2d30f3ed); | |
subtype pthread_mutexattr_t is union_2d30f3ed; | |
type struct_847975c1 is record | |
lock : aliased signed_int; | |
futex : aliased unsigned_int; | |
total_seq : aliased unsigned_long_long; | |
wakeup_seq : aliased unsigned_long_long; | |
woken_seq : aliased unsigned_long_long; | |
mutex : aliased void_ptr; | |
nwaiters : aliased unsigned_int; | |
broadcast_seq : aliased unsigned_int; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_847975c1); | |
type union_766df38e (Unchecked_Tag : unsigned_int := 0) is record | |
case Unchecked_Tag is | |
when 0 => | |
data : struct_847975c1; | |
when 1 => | |
size : char_array (0 .. 47); | |
when others => | |
align : signed_long_long; | |
end case; | |
end record; | |
pragma Unchecked_Union (union_766df38e); | |
pragma Convention (C_Pass_By_Copy, union_766df38e); | |
subtype pthread_cond_t is union_766df38e; | |
type union_e59bda7b (Unchecked_Tag : unsigned_int := 0) is record | |
case Unchecked_Tag is | |
when 0 => | |
size : char_array (0 .. 3); | |
when others => | |
align : signed_int; | |
end case; | |
end record; | |
pragma Unchecked_Union (union_e59bda7b); | |
pragma Convention (C_Pass_By_Copy, union_e59bda7b); | |
subtype pthread_condattr_t is union_e59bda7b; | |
subtype pthread_key_t is unsigned_int; | |
subtype pthread_once_t is signed_int; | |
type struct_47627da9 is record | |
lock : aliased signed_int; | |
nr_readers : aliased unsigned_int; | |
readers_wakeup : aliased unsigned_int; | |
writer_wakeup : aliased unsigned_int; | |
nr_readers_queued : aliased unsigned_int; | |
nr_writers_queued : aliased unsigned_int; | |
writer : aliased signed_int; | |
shared : aliased signed_int; | |
rwelision : aliased signed_char; | |
pad1 : aliased unsigned_char_array (0 .. 6); | |
pad2 : aliased unsigned_long; | |
flags : aliased unsigned_int; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_47627da9); | |
type union_74237cad (Unchecked_Tag : unsigned_int := 0) is record | |
case Unchecked_Tag is | |
when 0 => | |
data : struct_47627da9; | |
when 1 => | |
size : char_array (0 .. 55); | |
when others => | |
align : signed_long; | |
end case; | |
end record; | |
pragma Unchecked_Union (union_74237cad); | |
pragma Convention (C_Pass_By_Copy, union_74237cad); | |
subtype pthread_rwlock_t is union_74237cad; | |
type union_9074c3a7 (Unchecked_Tag : unsigned_int := 0) is record | |
case Unchecked_Tag is | |
when 0 => | |
size : char_array (0 .. 7); | |
when others => | |
align : signed_long; | |
end case; | |
end record; | |
pragma Unchecked_Union (union_9074c3a7); | |
pragma Convention (C_Pass_By_Copy, union_9074c3a7); | |
subtype pthread_rwlockattr_t is union_9074c3a7; | |
subtype pthread_spinlock_t is signed_int_volatile; | |
type union_76b18b58 (Unchecked_Tag : unsigned_int := 0) is record | |
case Unchecked_Tag is | |
when 0 => | |
size : char_array (0 .. 31); | |
when others => | |
align : signed_long; | |
end case; | |
end record; | |
pragma Unchecked_Union (union_76b18b58); | |
pragma Convention (C_Pass_By_Copy, union_76b18b58); | |
subtype pthread_barrier_t is union_76b18b58; | |
type union_aa31c06f (Unchecked_Tag : unsigned_int := 0) is record | |
case Unchecked_Tag is | |
when 0 => | |
size : char_array (0 .. 3); | |
when others => | |
align : signed_int; | |
end case; | |
end record; | |
pragma Unchecked_Union (union_aa31c06f); | |
pragma Convention (C_Pass_By_Copy, union_aa31c06f); | |
subtype pthread_barrierattr_t is union_aa31c06f; | |
BITS_PTHREADTYPES_H : constant := 1; | |
PTHREAD_MUTEX_HAVE_PREV : constant := 1; | |
-- __PTHREAD_RWLOCK_ELISION_EXTRA (unparsible) | |
PTHREAD_RWLOCK_INT_FLAGS_SHARED : constant := 1; | |
-- __PTHREAD_SPINS (unparsible) | |
SIZEOF_PTHREAD_ATTR_T : constant := 56; | |
SIZEOF_PTHREAD_BARRIERATTR_T : constant := 4; | |
SIZEOF_PTHREAD_BARRIER_T : constant := 32; | |
SIZEOF_PTHREAD_CONDATTR_T : constant := 4; | |
SIZEOF_PTHREAD_COND_T : constant := 48; | |
SIZEOF_PTHREAD_MUTEXATTR_T : constant := 4; | |
SIZEOF_PTHREAD_MUTEX_T : constant := 40; | |
SIZEOF_PTHREAD_RWLOCKATTR_T : constant := 8; | |
SIZEOF_PTHREAD_RWLOCK_T : constant := 56; | |
have_pthread_attr_t : constant := 1; | |
end C.bits.pthreadtypes; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.bits.select_h is | |
pragma Preelaborate; | |
-- __FD_CLR (uninterpretable) | |
-- __FD_ISSET (uninterpretable) | |
-- __FD_SET (uninterpretable) | |
-- __FD_ZERO (uninterpretable) | |
FD_ZERO_STOS : constant char_array (0 .. 5) := "stosq" & char'Val (0); | |
end C.bits.select_h; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.bits.sigset is | |
pragma Preelaborate; | |
subtype sig_atomic_t is signed_int; | |
type struct_957100ca is record | |
val : aliased unsigned_long_array (0 .. 15); | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_957100ca); | |
type struct_957100ca_const_ptr is access constant struct_957100ca; | |
for struct_957100ca_const_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_957100ca_const_ptr); | |
pragma Convention (C, struct_957100ca_const_ptr); | |
subtype sigset_t is struct_957100ca; | |
subtype sigset_t_const_ptr is struct_957100ca_const_ptr; | |
SIGSET_H_types : constant := 1; | |
SIGSET_NWORDS : constant := 16; | |
end C.bits.sigset; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
with C.bits.types; | |
package C.bits.time is | |
pragma Preelaborate; | |
type struct_timeval; | |
type struct_timeval is record | |
tv_sec : aliased types.qqtime_t; | |
tv_usec : aliased types.suseconds_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_timeval); | |
type struct_timeval_ptr is access all struct_timeval; | |
for struct_timeval_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_timeval_ptr); | |
pragma Convention (C, struct_timeval_ptr); | |
qSTRUCT_TIMEVAL : constant := 1; | |
end C.bits.time; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.bits.types is | |
pragma Preelaborate; | |
subtype u_char is unsigned_char; | |
subtype u_short is unsigned_short; | |
subtype u_int is unsigned_int; | |
subtype u_long is unsigned_long; | |
subtype int8_t is signed_char; | |
subtype uint8_t is unsigned_char; | |
subtype int16_t is signed_short; | |
subtype uint16_t is unsigned_short; | |
subtype int32_t is signed_int; | |
subtype uint32_t is unsigned_int; | |
subtype int64_t is signed_long; | |
subtype uint64_t is unsigned_long; | |
subtype quad_t is signed_long; | |
subtype quad_t_ptr is signed_long_ptr; | |
subtype u_quad_t is unsigned_long; | |
subtype dev_t is unsigned_long; | |
subtype uid_t is unsigned_int; | |
subtype gid_t is unsigned_int; | |
subtype gid_t_array is unsigned_int_array; | |
subtype gid_t_ptr is unsigned_int_ptr; | |
subtype ino_t is unsigned_long; | |
subtype ino64_t is unsigned_long; | |
subtype mode_t is unsigned_int; | |
subtype nlink_t is unsigned_long; | |
subtype off_t is signed_long; | |
subtype off64_t is signed_long; | |
subtype pid_t is signed_int; | |
type struct_47879b65 is record | |
val : aliased signed_int_array (0 .. 1); | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_47879b65); | |
subtype fsid_t is struct_47879b65; | |
subtype qqclock_t is signed_long; | |
subtype rlim_t is unsigned_long; | |
subtype rlim64_t is unsigned_long; | |
subtype id_t is unsigned_int; | |
subtype qqtime_t is signed_long; | |
subtype useconds_t is unsigned_int; | |
subtype suseconds_t is signed_long; | |
subtype daddr_t is signed_int; | |
subtype key_t is signed_int; | |
subtype qqclockid_t is signed_int; | |
subtype qqtimer_t is void_ptr; | |
subtype blksize_t is signed_long; | |
subtype blkcnt_t is signed_long; | |
subtype blkcnt64_t is signed_long; | |
subtype fsblkcnt_t is unsigned_long; | |
subtype fsblkcnt64_t is unsigned_long; | |
subtype fsfilcnt_t is unsigned_long; | |
subtype fsfilcnt64_t is unsigned_long; | |
subtype fsword_t is signed_long; | |
subtype ssize_t is signed_long; | |
subtype syscall_slong_t is signed_long; | |
subtype syscall_ulong_t is unsigned_long; | |
subtype loff_t is off64_t; | |
subtype qaddr_t is quad_t_ptr; | |
subtype caddr_t is char_ptr; | |
subtype intptr_t is signed_long; | |
subtype socklen_t is unsigned_int; | |
BITS_TYPES_H : constant := 1; | |
subtype S16_TYPE is signed_short; | |
subtype S32_TYPE is signed_int; | |
subtype S64_TYPE is signed_long; | |
subtype SLONG32_TYPE is signed_int; | |
subtype SLONGWORD_TYPE is signed_long; | |
subtype SQUAD_TYPE is signed_long; | |
subtype SWORD_TYPE is signed_long; | |
subtype U16_TYPE is unsigned_short; | |
subtype U32_TYPE is unsigned_int; | |
subtype U64_TYPE is unsigned_long; | |
subtype ULONG32_TYPE is unsigned_int; | |
subtype ULONGWORD_TYPE is unsigned_long; | |
subtype UQUAD_TYPE is unsigned_long; | |
subtype UWORD_TYPE is unsigned_long; | |
end C.bits.types; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.bits.typesizes is | |
pragma Preelaborate; | |
BITS_TYPESIZES_H : constant := 1; | |
subtype BLKCNT64_T_TYPE is signed_long; | |
subtype BLKCNT_T_TYPE is signed_long; | |
subtype BLKSIZE_T_TYPE is signed_long; | |
subtype CLOCKID_T_TYPE is signed_int; | |
subtype CLOCK_T_TYPE is signed_long; | |
subtype CPU_MASK_TYPE is unsigned_long; | |
subtype DADDR_T_TYPE is signed_int; | |
subtype DEV_T_TYPE is unsigned_long; | |
FD_SETSIZE : constant := 1024; | |
subtype FSBLKCNT64_T_TYPE is unsigned_long; | |
subtype FSBLKCNT_T_TYPE is unsigned_long; | |
subtype FSFILCNT64_T_TYPE is unsigned_long; | |
subtype FSFILCNT_T_TYPE is unsigned_long; | |
type struct_356c0c7a is record | |
val : aliased signed_int_array (0 .. 1); | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_356c0c7a); | |
subtype FSID_T_TYPE is struct_356c0c7a; | |
subtype FSWORD_T_TYPE is signed_long; | |
subtype GID_T_TYPE is unsigned_int; | |
subtype ID_T_TYPE is unsigned_int; | |
subtype INO64_T_TYPE is unsigned_long; | |
INO_T_MATCHES_INO64_T : constant := 1; | |
subtype INO_T_TYPE is unsigned_long; | |
subtype KEY_T_TYPE is signed_int; | |
subtype MODE_T_TYPE is unsigned_int; | |
subtype NLINK_T_TYPE is unsigned_long; | |
subtype OFF64_T_TYPE is signed_long; | |
OFF_T_MATCHES_OFF64_T : constant := 1; | |
subtype OFF_T_TYPE is signed_long; | |
subtype PID_T_TYPE is signed_int; | |
subtype RLIM64_T_TYPE is unsigned_long; | |
subtype RLIM_T_TYPE is unsigned_long; | |
subtype SSIZE_T_TYPE is signed_long; | |
subtype SUSECONDS_T_TYPE is signed_long; | |
subtype SYSCALL_SLONG_TYPE is signed_long; | |
subtype SYSCALL_ULONG_TYPE is unsigned_long; | |
-- __TIMER_T_TYPE (unparsible) | |
subtype TIME_T_TYPE is signed_long; | |
subtype UID_T_TYPE is unsigned_int; | |
subtype USECONDS_T_TYPE is unsigned_int; | |
end C.bits.typesizes; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.bits.wordsize is | |
pragma Preelaborate; | |
SYSCALL_WORDSIZE : constant := 64; | |
WORDSIZE : constant := 64; | |
WORDSIZE_TIME64_COMPAT32 : constant := 1; | |
end C.bits.wordsize; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.bits is | |
pragma Preelaborate; | |
end C.bits; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.endian is | |
pragma Preelaborate; | |
BIG_ENDIAN : constant := 4321; | |
BYTE_ORDER : constant := 1234; | |
LITTLE_ENDIAN : constant := 1234; | |
PDP_ENDIAN : constant := 3412; | |
ENDIAN_H : constant := 1; | |
qqBIG_ENDIAN : constant := 4321; | |
FLOAT_WORD_ORDER : constant := 1234; | |
qqLITTLE_ENDIAN : constant := 1234; | |
-- __LONG_LONG_PAIR (function macro) | |
qqPDP_ENDIAN : constant := 3412; | |
-- be16toh (function macro) | |
-- be32toh (function macro) | |
-- be64toh (function macro) | |
-- htobe16 (function macro) | |
-- htobe32 (function macro) | |
-- htobe64 (function macro) | |
-- htole16 (function macro) | |
-- htole32 (function macro) | |
-- htole64 (function macro) | |
-- le16toh (function macro) | |
-- le32toh (function macro) | |
-- le64toh (function macro) | |
end C.endian; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.features is | |
pragma Preelaborate; | |
ATFILE_SOURCE : constant := 1; | |
DEFAULT_SOURCE : constant := 1; | |
FEATURES_H : constant := 1; | |
POSIX_C_SOURCE : constant := 200809; | |
POSIX_SOURCE : constant := 1; | |
qqGLIBC_MINORqq : constant := 24; | |
-- __GLIBC_PREREQ (function macro) | |
qqGLIBCqq : constant := 2; | |
-- __GNUC_PREREQ (function macro) | |
qqGNU_LIBRARYqq : constant := 6; | |
-- __KERNEL_STRICT_NAMES (empty) | |
USE_ATFILE : constant := 1; | |
USE_FORTIFY_LEVEL : constant := 0; | |
USE_ISOC95 : constant := 1; | |
USE_ISOC99 : constant := 1; | |
USE_MISC : constant := 1; | |
USE_POSIX : constant := 1; | |
USE_POSIX199309 : constant := 1; | |
USE_POSIX199506 : constant := 1; | |
USE_POSIX2 : constant := 1; | |
USE_POSIX_IMPLICITLY : constant := 1; | |
USE_XOPEN2K : constant := 1; | |
USE_XOPEN2K8 : constant := 1; | |
end C.features; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.getopt is | |
pragma Preelaborate; | |
optarg : aliased char_ptr; | |
pragma Import (C, optarg, "optarg"); | |
optind : aliased signed_int; | |
pragma Import (C, optind, "optind"); | |
opterr : aliased signed_int; | |
pragma Import (C, opterr, "opterr"); | |
optopt : aliased signed_int; | |
pragma Import (C, optopt, "optopt"); | |
function getopt (argc : signed_int; argv : access char_ptr; | |
shortopts : access constant char) return signed_int; | |
pragma Import (C, getopt, "getopt"); | |
end C.getopt; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.gnu.stubs_64 is | |
pragma Preelaborate; | |
-- __stub___compat_bdflush (empty) | |
-- __stub_chflags (empty) | |
-- __stub_fattach (empty) | |
-- __stub_fchflags (empty) | |
-- __stub_fdetach (empty) | |
-- __stub_getmsg (empty) | |
-- __stub_gtty (empty) | |
-- __stub_lchmod (empty) | |
-- __stub_putmsg (empty) | |
-- __stub_revoke (empty) | |
-- __stub_setlogin (empty) | |
-- __stub_sigreturn (empty) | |
-- __stub_sstk (empty) | |
-- __stub_stty (empty) | |
end C.gnu.stubs_64; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.gnu is | |
pragma Preelaborate; | |
end C.gnu; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.limits is | |
pragma Preelaborate; | |
MB_LEN_MAX : constant := 16; | |
LIBC_LIMITS_H : constant := 1; | |
CHAR_BIT : constant := 8; | |
CHAR_MAX : constant := 127; | |
CHAR_MIN : constant := -128; | |
INT_MAX : constant := 2147483647; | |
INT_MIN : constant := -2147483648; | |
LLONG_MAX : constant := 9223372036854775807; | |
LLONG_MIN : constant := -9223372036854775808; | |
LONG_MAX : constant := 9223372036854775807; | |
LONG_MIN : constant := -9223372036854775808; | |
SCHAR_MAX : constant := 127; | |
SCHAR_MIN : constant := -128; | |
SHRT_MAX : constant := 32767; | |
SHRT_MIN : constant := -32768; | |
UCHAR_MAX : constant := 255; | |
UINT_MAX : constant := 4294967295; | |
ULLONG_MAX : constant := 18446744073709551615; | |
ULONG_MAX : constant := 18446744073709551615; | |
USHRT_MAX : constant := 65535; | |
-- _GCC_LIMITS_H_ (empty) | |
-- _LIMITS_H___ (empty) | |
end C.limits; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.linux.limits is | |
pragma Preelaborate; | |
MAX_CANON : constant := 255; | |
MAX_INPUT : constant := 255; | |
NAME_MAX : constant := 255; | |
NGROUPS_MAX : constant := 65536; | |
PATH_MAX : constant := 4096; | |
PIPE_BUF : constant := 4096; | |
RTSIG_MAX : constant := 32; | |
XATTR_LIST_MAX : constant := 65536; | |
XATTR_NAME_MAX : constant := 255; | |
XATTR_SIZE_MAX : constant := 65536; | |
-- _LINUX_LIMITS_H (empty) | |
end C.linux.limits; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.linux is | |
pragma Preelaborate; | |
end C.linux; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.stdarg is | |
pragma Preelaborate; | |
subtype qqgnuc_va_list is builtin_va_list; | |
subtype va_list is qqgnuc_va_list; | |
-- _ANSI_STDARG_H_ (empty) | |
-- _STDARG_H (empty) | |
-- _VA_LIST (empty) | |
-- _VA_LIST_ (empty) | |
-- _VA_LIST_DEFINED (empty) | |
-- _VA_LIST_T_H (empty) | |
-- __GNUC_VA_LIST (empty) | |
-- __va_copy (function macro) | |
-- __va_list__ (empty) | |
-- va_arg (function macro) | |
-- va_copy (function macro) | |
-- va_end (function macro) | |
-- va_start (function macro) | |
end C.stdarg; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.stddef is | |
pragma Preelaborate; | |
subtype size_t is Standard.C.size_t; | |
-- #include <xlocale.h> | |
-- #include <string.h> | |
subtype ptrdiff_t is Standard.C.ptrdiff_t; | |
subtype wchar_t is Standard.C.wchar_t; | |
C_NULL : constant void_ptr := void_ptr (System'To_Address (0)); | |
-- _ANSI_STDDEF_H (empty) | |
-- _BSD_PTRDIFF_T_ (empty) | |
-- _BSD_SIZE_T_ (empty) | |
-- _BSD_SIZE_T_DEFINED_ (empty) | |
-- _GCC_PTRDIFF_T (empty) | |
-- _GCC_SIZE_T (empty) | |
-- _GCC_WCHAR_T (empty) | |
-- _PTRDIFF_T (empty) | |
-- _PTRDIFF_T_ (empty) | |
-- _PTRDIFF_T_DECLARED (empty) | |
-- _SIZET_ (empty) | |
-- _SIZE_T (empty) | |
-- _SIZE_T_ (empty) | |
-- _SIZE_T_DECLARED (empty) | |
-- _SIZE_T_DEFINED (empty) | |
-- _SIZE_T_DEFINED_ (empty) | |
-- _STDDEF_H (empty) | |
-- _STDDEF_H_ (empty) | |
-- _SYS_SIZE_T_H (empty) | |
-- _T_PTRDIFF (empty) | |
-- _T_PTRDIFF_ (empty) | |
-- _T_SIZE (empty) | |
-- _T_SIZE_ (empty) | |
-- _T_WCHAR (empty) | |
-- _T_WCHAR_ (empty) | |
-- _WCHAR_T (empty) | |
-- _WCHAR_T_ (empty) | |
-- _WCHAR_T_DECLARED (empty) | |
-- _WCHAR_T_DEFINED (empty) | |
-- _WCHAR_T_DEFINED_ (empty) | |
-- _WCHAR_T_H (empty) | |
-- __INT_WCHAR_T_H (empty) | |
-- __PTRDIFF_T (empty) | |
-- __SIZE_T (empty) | |
-- __SIZE_T__ (empty) | |
-- __WCHAR_T (empty) | |
-- __WCHAR_T__ (empty) | |
-- ___int_ptrdiff_t_h (empty) | |
-- ___int_size_t_h (empty) | |
-- ___int_wchar_t_h (empty) | |
-- __size_t (empty) | |
-- __size_t__ (empty) | |
-- __wchar_t__ (empty) | |
-- offsetof (unparsible) | |
end C.stddef; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
with C.stddef; | |
with C.xlocale; | |
package C.string is | |
pragma Preelaborate; | |
function memcpy (dest : void_ptr; src : void_const_ptr; n : stddef.size_t) | |
return void_ptr; | |
pragma Import (C, memcpy, "memcpy"); | |
function memmove (dest : void_ptr; src : void_const_ptr; | |
n : stddef.size_t) return void_ptr; | |
pragma Import (C, memmove, "memmove"); | |
function memccpy (dest : void_ptr; src : void_const_ptr; c : signed_int; | |
n : stddef.size_t) return void_ptr; | |
pragma Import (C, memccpy, "memccpy"); | |
function memset (s : void_ptr; c : signed_int; n : stddef.size_t) | |
return void_ptr; | |
pragma Import (C, memset, "memset"); | |
function memcmp (s1 : void_const_ptr; s2 : void_const_ptr; | |
n : stddef.size_t) return signed_int; | |
pragma Import (C, memcmp, "memcmp"); | |
function memchr (s : void_const_ptr; c : signed_int; n : stddef.size_t) | |
return void_ptr; | |
pragma Import (C, memchr, "memchr"); | |
function strcpy (dest : access char; src : access constant char) | |
return char_ptr; | |
pragma Import (C, strcpy, "strcpy"); | |
function strncpy (dest : access char; src : access constant char; | |
n : stddef.size_t) return char_ptr; | |
pragma Import (C, strncpy, "strncpy"); | |
function strcat (dest : access char; src : access constant char) | |
return char_ptr; | |
pragma Import (C, strcat, "strcat"); | |
function strncat (dest : access char; src : access constant char; | |
n : stddef.size_t) return char_ptr; | |
pragma Import (C, strncat, "strncat"); | |
function strcmp (s1 : access constant char; s2 : access constant char) | |
return signed_int; | |
pragma Import (C, strcmp, "strcmp"); | |
function strncmp (s1 : access constant char; s2 : access constant char; | |
n : stddef.size_t) return signed_int; | |
pragma Import (C, strncmp, "strncmp"); | |
function strcoll (s1 : access constant char; s2 : access constant char) | |
return signed_int; | |
pragma Import (C, strcoll, "strcoll"); | |
function strxfrm (dest : access char; src : access constant char; | |
n : stddef.size_t) return stddef.size_t; | |
pragma Import (C, strxfrm, "strxfrm"); | |
-- #include <xlocale.h> | |
function strcoll_l (s1 : access constant char; s2 : access constant char; | |
l : access xlocale.struct_locale_struct) return signed_int; | |
pragma Import (C, strcoll_l, "strcoll_l"); | |
function strxfrm_l (dest : access char; src : access constant char; | |
n : stddef.size_t; l : access xlocale.struct_locale_struct) | |
return stddef.size_t; | |
pragma Import (C, strxfrm_l, "strxfrm_l"); | |
function strdup (s : access constant char) return char_ptr; | |
pragma Import (C, strdup, "strdup"); | |
function strndup (string : access constant char; n : stddef.size_t) | |
return char_ptr; | |
pragma Import (C, strndup, "strndup"); | |
function strchr (s : access constant char; c : signed_int) | |
return char_ptr; | |
pragma Import (C, strchr, "strchr"); | |
function strrchr (s : access constant char; c : signed_int) | |
return char_ptr; | |
pragma Import (C, strrchr, "strrchr"); | |
function strcspn (s : access constant char; reject : access constant char) | |
return stddef.size_t; | |
pragma Import (C, strcspn, "strcspn"); | |
function strspn (s : access constant char; | |
A_accept : access constant char) return stddef.size_t; | |
pragma Import (C, strspn, "strspn"); | |
function strpbrk (s : access constant char; | |
A_accept : access constant char) return char_ptr; | |
pragma Import (C, strpbrk, "strpbrk"); | |
function strstr (haystack : access constant char; | |
needle : access constant char) return char_ptr; | |
pragma Import (C, strstr, "strstr"); | |
function strtok (s : access char; delim : access constant char) | |
return char_ptr; | |
pragma Import (C, strtok, "strtok"); | |
function qqstrtok_r (s : access char; delim : access constant char; | |
save_ptr : access char_ptr) return char_ptr; | |
pragma Import (C, qqstrtok_r, "__strtok_r"); | |
function strtok_r (s : access char; delim : access constant char; | |
save_ptr : access char_ptr) return char_ptr; | |
pragma Import (C, strtok_r, "strtok_r"); | |
function strlen (s : access constant char) return stddef.size_t; | |
pragma Import (C, strlen, "strlen"); | |
function strnlen (string : access constant char; maxlen : stddef.size_t) | |
return stddef.size_t; | |
pragma Import (C, strnlen, "strnlen"); | |
function strerror (errnum : signed_int) return char_ptr; | |
pragma Import (C, strerror, "strerror"); | |
function strerror_r (errnum : signed_int; buf : access char; | |
buflen : stddef.size_t) return signed_int; | |
pragma Import (C, strerror_r, "_xpg_strerror_r"); | |
function strerror_l (errnum : signed_int; | |
l : access xlocale.struct_locale_struct) return char_ptr; | |
pragma Import (C, strerror_l, "strerror_l"); | |
procedure qqbzero (s : void_ptr; n : stddef.size_t); | |
pragma Import (C, qqbzero, "__bzero"); | |
procedure bcopy (src : void_const_ptr; dest : void_ptr; | |
n : stddef.size_t); | |
pragma Import (C, bcopy, "bcopy"); | |
procedure bzero (s : void_ptr; n : stddef.size_t); | |
pragma Import (C, bzero, "bzero"); | |
function bcmp (s1 : void_const_ptr; s2 : void_const_ptr; | |
n : stddef.size_t) return signed_int; | |
pragma Import (C, bcmp, "bcmp"); | |
function index (s : access constant char; c : signed_int) return char_ptr; | |
pragma Import (C, index, "index"); | |
function rindex (s : access constant char; c : signed_int) | |
return char_ptr; | |
pragma Import (C, rindex, "rindex"); | |
function ffs (i : signed_int) return signed_int; | |
pragma Import (C, ffs, "ffs"); | |
function strcasecmp (s1 : access constant char; s2 : access constant char) | |
return signed_int; | |
pragma Import (C, strcasecmp, "strcasecmp"); | |
function strncasecmp (s1 : access constant char; | |
s2 : access constant char; n : stddef.size_t) return signed_int; | |
pragma Import (C, strncasecmp, "strncasecmp"); | |
function strsep (stringp : access char_ptr; delim : access constant char) | |
return char_ptr; | |
pragma Import (C, strsep, "strsep"); | |
function strsignal (sig : signed_int) return char_ptr; | |
pragma Import (C, strsignal, "strsignal"); | |
function qqstpcpy (dest : access char; src : access constant char) | |
return char_ptr; | |
pragma Import (C, qqstpcpy, "__stpcpy"); | |
function stpcpy (dest : access char; src : access constant char) | |
return char_ptr; | |
pragma Import (C, stpcpy, "stpcpy"); | |
function qqstpncpy (dest : access char; src : access constant char; | |
n : stddef.size_t) return char_ptr; | |
pragma Import (C, qqstpncpy, "__stpncpy"); | |
function stpncpy (dest : access char; src : access constant char; | |
n : stddef.size_t) return char_ptr; | |
pragma Import (C, stpncpy, "stpncpy"); | |
STRING_H : constant := 1; | |
end C.string; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.sys.cdefs is | |
pragma Preelaborate; | |
SYS_CDEFS_H : constant := 1; | |
-- __ASMNAME (unparsible) | |
-- __ASMNAME2 (unparsible) | |
-- __BEGIN_DECLS (empty) | |
-- __BEGIN_NAMESPACE_C99 (empty) | |
-- __BEGIN_NAMESPACE_STD (empty) | |
-- __CONCAT (has # or ##) | |
-- __END_DECLS (empty) | |
-- __END_NAMESPACE_C99 (empty) | |
-- __END_NAMESPACE_STD (empty) | |
-- __LDBL_REDIR (unparsible) | |
-- __LDBL_REDIR1 (unparsible) | |
-- __LDBL_REDIR1_NTH (unparsible) | |
-- __LDBL_REDIR_DECL (empty) | |
-- __LDBL_REDIR_NTH (unparsible) | |
-- __LEAF (unparsible) | |
-- __LEAF_ATTR (attribute) | |
-- __NTH (unparsible) | |
-- __P (function macro) | |
-- __PMT (function macro) | |
-- __REDIRECT (has # or ##) | |
-- __REDIRECT_LDBL (unparsible) | |
-- __REDIRECT_NTH (has # or ##) | |
-- __REDIRECT_NTHNL (has # or ##) | |
-- __REDIRECT_NTH_LDBL (unparsible) | |
-- __STRING (has # or ##) | |
-- __THROW (attribute) | |
-- __THROWNL (attribute) | |
-- __USING_NAMESPACE_C99 (empty) | |
-- __USING_NAMESPACE_STD (empty) | |
-- __always_inline (alias of inline) | |
-- __attribute_alloc_size__ (unparsible) | |
-- __attribute_artificial__ (attribute) | |
-- __attribute_const__ (attribute) | |
-- __attribute_deprecated__ (attribute) | |
-- __attribute_format_arg__ (parameterized declaration-specifiers) | |
-- __attribute_format_strfmon__ (parameterized declaration-specifiers) | |
-- __attribute_malloc__ (attribute) | |
-- __attribute_noinline__ (attribute) | |
-- __attribute_pure__ (attribute) | |
-- __attribute_used__ (attribute) | |
-- __attribute_warn_unused_result__ (attribute) | |
-- __bos (function macro) | |
-- __bos0 (function macro) | |
-- __errordecl (unparsible) | |
-- __extern_always_inline (unparsible) | |
-- __extern_inline (alias of inline) | |
-- __flexarr (unparsible) | |
-- __fortify_function (unparsible) | |
-- __glibc_likely (function macro) | |
-- __glibc_unlikely (function macro) | |
subtype long_double_t is long_double; | |
-- __nonnull (unparsible) | |
-- __ptr_t (unparsible) | |
-- __restrict_arr (alias of restrict) | |
-- __va_arg_pack (unparsible) | |
-- __va_arg_pack_len (unparsible) | |
-- __warnattr (unparsible) | |
-- __warndecl (unparsible) | |
-- __wur (empty) | |
end C.sys.cdefs; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
with C.bits.sigset; | |
with C.bits.time; | |
with C.bits.types; | |
with C.time; | |
package C.sys.select_h is | |
pragma Preelaborate; | |
subtype sigset_t is bits.sigset.sigset_t; | |
-- #include <time.h> | |
-- #include <bits/time.h> | |
subtype suseconds_t is bits.types.suseconds_t; | |
subtype qqfd_mask is signed_long; | |
subtype qqfd_mask_array is signed_long_array; | |
type struct_94b6543f is record | |
fds_bits : aliased qqfd_mask_array (0 .. 15); | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_94b6543f); | |
type struct_94b6543f_ptr is access all struct_94b6543f; | |
for struct_94b6543f_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_94b6543f_ptr); | |
pragma Convention (C, struct_94b6543f_ptr); | |
subtype fd_set is struct_94b6543f; | |
subtype fd_set_ptr is struct_94b6543f_ptr; | |
subtype fd_mask is qqfd_mask; | |
function C_select (nfds : signed_int; readfds : access fd_set; | |
writefds : access fd_set; exceptfds : access fd_set; | |
timeout : access bits.time.struct_timeval) return signed_int; | |
pragma Import (C, C_select, "select"); | |
function pselect (nfds : signed_int; readfds : access fd_set; | |
writefds : access fd_set; exceptfds : access fd_set; | |
timeout : access constant time.struct_timespec; | |
sigmask : access constant bits.sigset.sigset_t) return signed_int; | |
pragma Import (C, pselect, "pselect"); | |
-- FD_CLR (uninterpretable) | |
-- FD_ISSET (uninterpretable) | |
-- FD_SET (uninterpretable) | |
FD_SETSIZE : constant := 1024; | |
-- FD_ZERO (uninterpretable) | |
NFDBITS : constant := 64; | |
SYS_SELECT_H : constant := 1; | |
-- __FDS_BITS (uninterpretable) | |
-- __FD_ELT (function macro) | |
-- __FD_MASK (function macro) | |
qqNFDBITS : constant := 64; | |
-- __sigset_t_defined (empty) | |
-- __suseconds_t_defined (empty) | |
end C.sys.select_h; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.sys.sysmacros is | |
pragma Preelaborate; | |
function gnu_dev_major (dev : unsigned_long_long) return unsigned_int; | |
pragma Import (C, gnu_dev_major, "gnu_dev_major"); | |
function gnu_dev_minor (dev : unsigned_long_long) return unsigned_int; | |
pragma Import (C, gnu_dev_minor, "gnu_dev_minor"); | |
function gnu_dev_makedev (major : unsigned_int; minor : unsigned_int) | |
return unsigned_long_long; | |
pragma Import (C, gnu_dev_makedev, "gnu_dev_makedev"); | |
SYS_SYSMACROS_H : constant := 1; | |
-- major (unparsible) | |
-- makedev (unparsible) | |
-- minor (unparsible) | |
end C.sys.sysmacros; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
with C.bits.types; | |
package C.sys.types is | |
pragma Preelaborate; | |
subtype u_char is bits.types.u_char; | |
subtype u_short is bits.types.u_short; | |
subtype u_int is bits.types.u_int; | |
subtype u_long is bits.types.u_long; | |
subtype quad_t is bits.types.quad_t; | |
subtype u_quad_t is bits.types.u_quad_t; | |
subtype fsid_t is bits.types.fsid_t; | |
subtype loff_t is bits.types.loff_t; | |
subtype ino_t is bits.types.ino_t; | |
subtype dev_t is bits.types.dev_t; | |
subtype gid_t is bits.types.gid_t; | |
subtype mode_t is bits.types.mode_t; | |
subtype nlink_t is bits.types.nlink_t; | |
subtype uid_t is bits.types.uid_t; | |
subtype off_t is bits.types.off_t; | |
subtype pid_t is bits.types.pid_t; | |
subtype id_t is bits.types.id_t; | |
subtype ssize_t is bits.types.ssize_t; | |
subtype daddr_t is bits.types.daddr_t; | |
subtype caddr_t is bits.types.caddr_t; | |
subtype key_t is bits.types.key_t; | |
-- #include <time.h> | |
subtype ulong is unsigned_long; | |
subtype ushort is unsigned_short; | |
subtype uint is unsigned_int; | |
subtype int8_t is signed_char; | |
subtype int16_t is signed_short; | |
subtype int32_t is signed_int; | |
subtype int64_t is signed_long; | |
subtype u_int8_t is unsigned_char; | |
subtype u_int16_t is unsigned_short; | |
subtype u_int32_t is unsigned_int; | |
subtype u_int64_t is unsigned_long; | |
subtype register_t is signed_long; | |
-- #include <bits/byteswap.h> | |
-- #include <bits/sigset.h> | |
-- #include <time.h> | |
-- #include <bits/time.h> | |
-- #include <sys/select.h> | |
-- #include <sys/sysmacros.h> | |
subtype blksize_t is bits.types.blksize_t; | |
subtype blkcnt_t is bits.types.blkcnt_t; | |
subtype fsblkcnt_t is bits.types.fsblkcnt_t; | |
subtype fsfilcnt_t is bits.types.fsfilcnt_t; | |
SYS_TYPES_H : constant := 1; | |
qqBIT_TYPES_DEFINEDqq : constant := 1; | |
-- __blkcnt_t_defined (empty) | |
-- __blksize_t_defined (empty) | |
-- __daddr_t_defined (empty) | |
-- __dev_t_defined (empty) | |
-- __fsblkcnt_t_defined (empty) | |
-- __fsfilcnt_t_defined (empty) | |
-- __gid_t_defined (empty) | |
-- __id_t_defined (empty) | |
-- __ino_t_defined (empty) | |
-- __int8_t_defined (empty) | |
-- __intN_t (has # or ##) | |
-- __key_t_defined (empty) | |
-- __mode_t_defined (empty) | |
-- __need_clockid_t (empty) | |
-- __nlink_t_defined (empty) | |
-- __off_t_defined (empty) | |
-- __pid_t_defined (empty) | |
-- __ssize_t_defined (empty) | |
-- __u_char_defined (empty) | |
-- __u_intN_t (has # or ##) | |
-- __uid_t_defined (empty) | |
end C.sys.types; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.sys is | |
pragma Preelaborate; | |
end C.sys; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
with C.bits.types; | |
package C.time is | |
pragma Preelaborate; | |
subtype clock_t is bits.types.qqclock_t; | |
subtype time_t is bits.types.qqtime_t; | |
subtype clockid_t is bits.types.qqclockid_t; | |
subtype timer_t is bits.types.qqtimer_t; | |
-- #include <sys/types.h> | |
-- #include <bits/byteswap.h> | |
-- #include <bits/sigset.h> | |
-- #include <sys/select.h> | |
type struct_timespec; | |
type struct_timespec is record | |
tv_sec : aliased bits.types.qqtime_t; | |
tv_nsec : aliased bits.types.syscall_slong_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_timespec); | |
type struct_timespec_const_ptr is access constant struct_timespec; | |
for struct_timespec_const_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_timespec_const_ptr); | |
pragma Convention (C, struct_timespec_const_ptr); | |
clock_t_defined : constant := 1; | |
clockid_t_defined : constant := 1; | |
time_t_defined : constant := 1; | |
timer_t_defined : constant := 1; | |
timespec_defined : constant := 1; | |
end C.time; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
with C.bits.types; | |
with C.stddef; | |
with C.sys.types; | |
package C.unistd is | |
pragma Preelaborate; | |
subtype useconds_t is bits.types.useconds_t; | |
subtype intptr_t is bits.types.intptr_t; | |
subtype socklen_t is bits.types.socklen_t; | |
function C_access (name : access constant char; A_type : signed_int) | |
return signed_int; | |
pragma Import (C, C_access, "access"); | |
function faccessat (fd : signed_int; file : access constant char; | |
A_type : signed_int; flag : signed_int) return signed_int; | |
pragma Import (C, faccessat, "faccessat"); | |
function lseek (fd : signed_int; offset : bits.types.off_t; | |
whence : signed_int) return bits.types.off_t; | |
pragma Import (C, lseek, "lseek"); | |
function close (fd : signed_int) return signed_int; | |
pragma Import (C, close, "close"); | |
function read (fd : signed_int; buf : void_ptr; nbytes : stddef.size_t) | |
return sys.types.ssize_t; | |
pragma Import (C, read, "read"); | |
function write (fd : signed_int; buf : void_const_ptr; n : stddef.size_t) | |
return sys.types.ssize_t; | |
pragma Import (C, write, "write"); | |
function pread (fd : signed_int; buf : void_ptr; nbytes : stddef.size_t; | |
offset : bits.types.off_t) return sys.types.ssize_t; | |
pragma Import (C, pread, "pread"); | |
function pwrite (fd : signed_int; buf : void_const_ptr; n : stddef.size_t; | |
offset : bits.types.off_t) return sys.types.ssize_t; | |
pragma Import (C, pwrite, "pwrite"); | |
function pipe (pipedes : access signed_int) return signed_int; | |
pragma Import (C, pipe, "pipe"); | |
function alarm (seconds : unsigned_int) return unsigned_int; | |
pragma Import (C, alarm, "alarm"); | |
function sleep (seconds : unsigned_int) return unsigned_int; | |
pragma Import (C, sleep, "sleep"); | |
function ualarm (value : bits.types.useconds_t; | |
interval : bits.types.useconds_t) return bits.types.useconds_t; | |
pragma Import (C, ualarm, "ualarm"); | |
function usleep (useconds : bits.types.useconds_t) return signed_int; | |
pragma Import (C, usleep, "usleep"); | |
function pause return signed_int; | |
pragma Import (C, pause, "pause"); | |
function chown (file : access constant char; owner : bits.types.uid_t; | |
group : bits.types.gid_t) return signed_int; | |
pragma Import (C, chown, "chown"); | |
function fchown (fd : signed_int; owner : bits.types.uid_t; | |
group : bits.types.gid_t) return signed_int; | |
pragma Import (C, fchown, "fchown"); | |
function lchown (file : access constant char; owner : bits.types.uid_t; | |
group : bits.types.gid_t) return signed_int; | |
pragma Import (C, lchown, "lchown"); | |
function fchownat (fd : signed_int; file : access constant char; | |
owner : bits.types.uid_t; group : bits.types.gid_t; flag : signed_int) | |
return signed_int; | |
pragma Import (C, fchownat, "fchownat"); | |
function chdir (path : access constant char) return signed_int; | |
pragma Import (C, chdir, "chdir"); | |
function fchdir (fd : signed_int) return signed_int; | |
pragma Import (C, fchdir, "fchdir"); | |
function getcwd (buf : access char; size : stddef.size_t) return char_ptr; | |
pragma Import (C, getcwd, "getcwd"); | |
function getwd (buf : access char) return char_ptr; | |
pragma Import (C, getwd, "getwd"); | |
function dup (fd : signed_int) return signed_int; | |
pragma Import (C, dup, "dup"); | |
function dup2 (fd : signed_int; fd2 : signed_int) return signed_int; | |
pragma Import (C, dup2, "dup2"); | |
environ : aliased char_ptr_ptr; | |
pragma Import (C, environ, "__environ"); | |
function execve (path : access constant char; argv : access char_ptr; | |
envp : access char_ptr) return signed_int; | |
pragma Import (C, execve, "execve"); | |
function fexecve (fd : signed_int; argv : access char_ptr; | |
envp : access char_ptr) return signed_int; | |
pragma Import (C, fexecve, "fexecve"); | |
function execv (path : access constant char; argv : access char_ptr) | |
return signed_int; | |
pragma Import (C, execv, "execv"); | |
function execle (path : access constant char; arg : access constant char) | |
return signed_int; | |
pragma Import (C, execle, "execle"); | |
function execl (path : access constant char; arg : access constant char) | |
return signed_int; | |
pragma Import (C, execl, "execl"); | |
function execvp (file : access constant char; argv : access char_ptr) | |
return signed_int; | |
pragma Import (C, execvp, "execvp"); | |
function execlp (file : access constant char; arg : access constant char) | |
return signed_int; | |
pragma Import (C, execlp, "execlp"); | |
function nice (inc : signed_int) return signed_int; | |
pragma Import (C, nice, "nice"); | |
procedure C_qexit (status : signed_int); | |
pragma No_Return (C_qexit); | |
pragma Import (C, C_qexit, "_exit"); | |
-- #include <bits/confname.h> | |
function pathconf (path : access constant char; name : signed_int) | |
return signed_long; | |
pragma Import (C, pathconf, "pathconf"); | |
function fpathconf (fd : signed_int; name : signed_int) | |
return signed_long; | |
pragma Import (C, fpathconf, "fpathconf"); | |
function sysconf (name : signed_int) return signed_long; | |
pragma Import (C, sysconf, "sysconf"); | |
function confstr (name : signed_int; buf : access char; | |
len : stddef.size_t) return stddef.size_t; | |
pragma Import (C, confstr, "confstr"); | |
function getpid return bits.types.pid_t; | |
pragma Import (C, getpid, "getpid"); | |
function getppid return bits.types.pid_t; | |
pragma Import (C, getppid, "getppid"); | |
function getpgrp return bits.types.pid_t; | |
pragma Import (C, getpgrp, "getpgrp"); | |
function qqgetpgid (pid : bits.types.pid_t) return bits.types.pid_t; | |
pragma Import (C, qqgetpgid, "__getpgid"); | |
function getpgid (pid : bits.types.pid_t) return bits.types.pid_t; | |
pragma Import (C, getpgid, "getpgid"); | |
function setpgid (pid : bits.types.pid_t; pgid : bits.types.pid_t) | |
return signed_int; | |
pragma Import (C, setpgid, "setpgid"); | |
function setpgrp return signed_int; | |
pragma Import (C, setpgrp, "setpgrp"); | |
function setsid return bits.types.pid_t; | |
pragma Import (C, setsid, "setsid"); | |
function getsid (pid : bits.types.pid_t) return bits.types.pid_t; | |
pragma Import (C, getsid, "getsid"); | |
function getuid return bits.types.uid_t; | |
pragma Import (C, getuid, "getuid"); | |
function geteuid return bits.types.uid_t; | |
pragma Import (C, geteuid, "geteuid"); | |
function getgid return bits.types.gid_t; | |
pragma Import (C, getgid, "getgid"); | |
function getegid return bits.types.gid_t; | |
pragma Import (C, getegid, "getegid"); | |
function getgroups (size : signed_int; list : access bits.types.gid_t) | |
return signed_int; | |
pragma Import (C, getgroups, "getgroups"); | |
function setuid (uid : bits.types.uid_t) return signed_int; | |
pragma Import (C, setuid, "setuid"); | |
function setreuid (ruid : bits.types.uid_t; euid : bits.types.uid_t) | |
return signed_int; | |
pragma Import (C, setreuid, "setreuid"); | |
function seteuid (uid : bits.types.uid_t) return signed_int; | |
pragma Import (C, seteuid, "seteuid"); | |
function setgid (gid : bits.types.gid_t) return signed_int; | |
pragma Import (C, setgid, "setgid"); | |
function setregid (rgid : bits.types.gid_t; egid : bits.types.gid_t) | |
return signed_int; | |
pragma Import (C, setregid, "setregid"); | |
function setegid (gid : bits.types.gid_t) return signed_int; | |
pragma Import (C, setegid, "setegid"); | |
function fork return bits.types.pid_t; | |
pragma Import (C, fork, "fork"); | |
function vfork return bits.types.pid_t; | |
pragma Import (C, vfork, "vfork"); | |
function ttyname (fd : signed_int) return char_ptr; | |
pragma Import (C, ttyname, "ttyname"); | |
function ttyname_r (fd : signed_int; buf : access char; | |
buflen : stddef.size_t) return signed_int; | |
pragma Import (C, ttyname_r, "ttyname_r"); | |
function isatty (fd : signed_int) return signed_int; | |
pragma Import (C, isatty, "isatty"); | |
function ttyslot return signed_int; | |
pragma Import (C, ttyslot, "ttyslot"); | |
function link (from : access constant char; to : access constant char) | |
return signed_int; | |
pragma Import (C, link, "link"); | |
function linkat (fromfd : signed_int; from : access constant char; | |
tofd : signed_int; to : access constant char; flags : signed_int) | |
return signed_int; | |
pragma Import (C, linkat, "linkat"); | |
function symlink (from : access constant char; to : access constant char) | |
return signed_int; | |
pragma Import (C, symlink, "symlink"); | |
function readlink (path : access constant char; buf : access char; | |
len : stddef.size_t) return sys.types.ssize_t; | |
pragma Import (C, readlink, "readlink"); | |
function symlinkat (from : access constant char; tofd : signed_int; | |
to : access constant char) return signed_int; | |
pragma Import (C, symlinkat, "symlinkat"); | |
function readlinkat (fd : signed_int; path : access constant char; | |
buf : access char; len : stddef.size_t) return sys.types.ssize_t; | |
pragma Import (C, readlinkat, "readlinkat"); | |
function unlink (name : access constant char) return signed_int; | |
pragma Import (C, unlink, "unlink"); | |
function unlinkat (fd : signed_int; name : access constant char; | |
flag : signed_int) return signed_int; | |
pragma Import (C, unlinkat, "unlinkat"); | |
function rmdir (path : access constant char) return signed_int; | |
pragma Import (C, rmdir, "rmdir"); | |
function tcgetpgrp (fd : signed_int) return bits.types.pid_t; | |
pragma Import (C, tcgetpgrp, "tcgetpgrp"); | |
function tcsetpgrp (fd : signed_int; pgrp_id : bits.types.pid_t) | |
return signed_int; | |
pragma Import (C, tcsetpgrp, "tcsetpgrp"); | |
function getlogin return char_ptr; | |
pragma Import (C, getlogin, "getlogin"); | |
function getlogin_r (name : access char; name_len : stddef.size_t) | |
return signed_int; | |
pragma Import (C, getlogin_r, "getlogin_r"); | |
function setlogin (name : access constant char) return signed_int; | |
pragma Import (C, setlogin, "setlogin"); | |
-- #include <getopt.h> | |
function gethostname (name : access char; len : stddef.size_t) | |
return signed_int; | |
pragma Import (C, gethostname, "gethostname"); | |
function sethostname (name : access constant char; len : stddef.size_t) | |
return signed_int; | |
pragma Import (C, sethostname, "sethostname"); | |
function sethostid (id : signed_long) return signed_int; | |
pragma Import (C, sethostid, "sethostid"); | |
function getdomainname (name : access char; len : stddef.size_t) | |
return signed_int; | |
pragma Import (C, getdomainname, "getdomainname"); | |
function setdomainname (name : access constant char; len : stddef.size_t) | |
return signed_int; | |
pragma Import (C, setdomainname, "setdomainname"); | |
function vhangup return signed_int; | |
pragma Import (C, vhangup, "vhangup"); | |
function revoke (file : access constant char) return signed_int; | |
pragma Import (C, revoke, "revoke"); | |
function profil (sample_buffer : access unsigned_short; | |
size : stddef.size_t; offset : stddef.size_t; scale : unsigned_int) | |
return signed_int; | |
pragma Import (C, profil, "profil"); | |
function acct (name : access constant char) return signed_int; | |
pragma Import (C, acct, "acct"); | |
function getusershell return char_ptr; | |
pragma Import (C, getusershell, "getusershell"); | |
procedure endusershell; | |
pragma Import (C, endusershell, "endusershell"); | |
procedure setusershell; | |
pragma Import (C, setusershell, "setusershell"); | |
function daemon (nochdir : signed_int; noclose : signed_int) | |
return signed_int; | |
pragma Import (C, daemon, "daemon"); | |
function chroot (path : access constant char) return signed_int; | |
pragma Import (C, chroot, "chroot"); | |
function getpass (prompt : access constant char) return char_ptr; | |
pragma Import (C, getpass, "getpass"); | |
function fsync (fd : signed_int) return signed_int; | |
pragma Import (C, fsync, "fsync"); | |
function gethostid return signed_long; | |
pragma Import (C, gethostid, "gethostid"); | |
procedure sync; | |
pragma Import (C, sync, "sync"); | |
function getpagesize return signed_int; | |
pragma Import (C, getpagesize, "getpagesize"); | |
function getdtablesize return signed_int; | |
pragma Import (C, getdtablesize, "getdtablesize"); | |
function truncate (file : access constant char; length : bits.types.off_t) | |
return signed_int; | |
pragma Import (C, truncate, "truncate"); | |
function ftruncate (fd : signed_int; length : bits.types.off_t) | |
return signed_int; | |
pragma Import (C, ftruncate, "ftruncate"); | |
function brk (addr : void_ptr) return signed_int; | |
pragma Import (C, brk, "brk"); | |
function sbrk (A_delta : intptr_t) return void_ptr; | |
pragma Import (C, sbrk, "sbrk"); | |
function syscall (sysno : signed_long) return signed_long; | |
pragma Import (C, syscall, "syscall"); | |
function lockf (fd : signed_int; cmd : signed_int; len : bits.types.off_t) | |
return signed_int; | |
pragma Import (C, lockf, "lockf"); | |
function fdatasync (fildes : signed_int) return signed_int; | |
pragma Import (C, fdatasync, "fdatasync"); | |
F_LOCK : constant := 1; | |
F_OK : constant := 0; | |
F_TEST : constant := 3; | |
F_TLOCK : constant := 2; | |
F_ULOCK : constant := 0; | |
L_INCR : constant := 1; | |
L_SET : constant := 0; | |
L_XTND : constant := 2; | |
R_OK : constant := 4; | |
SEEK_CUR : constant := 1; | |
SEEK_END : constant := 2; | |
SEEK_SET : constant := 0; | |
STDERR_FILENO : constant := 2; | |
STDIN_FILENO : constant := 0; | |
STDOUT_FILENO : constant := 1; | |
W_OK : constant := 2; | |
X_OK : constant := 1; | |
POSIX2_C_BIND : constant := 200809; | |
POSIX2_C_DEV : constant := 200809; | |
POSIX2_C_VERSION : constant := 200809; | |
POSIX2_LOCALEDEF : constant := 200809; | |
POSIX2_SW_DEV : constant := 200809; | |
POSIX2_VERSION : constant := 200809; | |
POSIX_VERSION : constant := 200809; | |
UNISTD_H : constant := 1; | |
XOPEN_CRYPT : constant := 1; | |
XOPEN_ENH_I18N : constant := 1; | |
XOPEN_LEGACY : constant := 1; | |
XOPEN_UNIX : constant := 1; | |
XOPEN_VERSION : constant := 700; | |
XOPEN_XCU_VERSION : constant := 4; | |
XOPEN_XPG2 : constant := 1; | |
XOPEN_XPG3 : constant := 1; | |
XOPEN_XPG4 : constant := 1; | |
POSIX2_THIS_VERSION : constant := 200809; | |
-- __intptr_t_defined (empty) | |
-- __socklen_t_defined (empty) | |
-- __useconds_t_defined (empty) | |
end C.unistd; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.xlocale is | |
pragma Preelaborate; | |
type struct_locale_struct; | |
type struct_locale_data (<>) is limited private; | |
type struct_locale_data_ptr is access all struct_locale_data; | |
for struct_locale_data_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_locale_data_ptr); | |
pragma Convention (C, struct_locale_data_ptr); | |
type struct_locale_data_ptr_array is array (size_t range <>) of | |
aliased struct_locale_data_ptr; | |
pragma Convention (C, struct_locale_data_ptr_array); | |
type struct_locale_struct is record | |
locales : aliased struct_locale_data_ptr_array (0 .. 12); | |
ctype_b : aliased unsigned_short_const_ptr; | |
ctype_tolower : aliased signed_int_const_ptr; | |
ctype_toupper : aliased signed_int_const_ptr; | |
names : aliased char_const_ptr_array (0 .. 12); | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_locale_struct); | |
type struct_locale_struct_ptr is access all struct_locale_struct; | |
for struct_locale_struct_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_locale_struct_ptr); | |
pragma Convention (C, struct_locale_struct_ptr); | |
subtype qqlocale_t is struct_locale_struct_ptr; | |
subtype locale_t is qqlocale_t; | |
XLOCALE_H : constant := 1; | |
private | |
type struct_locale_data is null record; | |
end C.xlocale; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
with C.stddef; | |
with C.sys.types; | |
package C.zconf is | |
pragma Preelaborate; | |
subtype z_size_t is stddef.size_t; | |
subtype Byte is unsigned_char; | |
subtype Byte_ptr is unsigned_char_ptr; | |
subtype Byte_const_ptr is unsigned_char_const_ptr; | |
subtype uInt is unsigned_int; | |
subtype uInt_ptr is unsigned_int_ptr; | |
subtype uLong is unsigned_long; | |
subtype uLong_ptr is unsigned_long_ptr; | |
subtype Bytef is Byte; | |
subtype Bytef_ptr is Byte_ptr; | |
subtype Bytef_const_ptr is Byte_const_ptr; | |
subtype charf is char; | |
subtype intf is signed_int; | |
subtype uIntf is uInt; | |
subtype uLongf is uLong; | |
subtype uLongf_ptr is uLong_ptr; | |
subtype voidpc is void_const_ptr; | |
subtype voidpf is void_ptr; | |
subtype voidp is void_ptr; | |
subtype z_crc_t is unsigned_int; | |
subtype z_crc_t_const_ptr is unsigned_int_const_ptr; | |
-- FAR (empty) | |
MAX_MEM_LEVEL : constant := 9; | |
MAX_WBITS : constant := 15; | |
-- OF (function macro) | |
-- STDC (empty) | |
-- STDC99 (empty) | |
-- ZCONF_H (empty) | |
-- ZEXPORT (empty) | |
-- ZEXPORTVA (empty) | |
-- ZEXTERN (alias of extern) | |
-- Z_ARG (function macro) | |
-- Z_HAVE_STDARG_H (empty) | |
-- Z_HAVE_UNISTD_H (empty) | |
-- Z_LFS64 (empty) | |
subtype Z_U4 is unsigned_int; | |
-- z_const (empty) | |
subtype z_off64_t is sys.types.off_t; | |
subtype z_off_t is sys.types.off_t; | |
end C.zconf; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package body C.zlib is | |
function get_zlib_version return char_const_ptr is | |
begin | |
return zlibVersion; | |
end get_zlib_version; | |
end C.zlib; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
with C.stdarg; | |
with C.sys.types; | |
with C.zconf; | |
package C.zlib is | |
pragma Preelaborate; | |
type access_c90a7a2a is access function (opaque : zconf.voidpf; | |
items : zconf.uInt; size : zconf.uInt) return zconf.voidpf; | |
pragma Convention (C, access_c90a7a2a); | |
subtype alloc_func is access_c90a7a2a; | |
type access_0d4008bc is access procedure (opaque : zconf.voidpf; | |
address : zconf.voidpf); | |
pragma Convention (C, access_0d4008bc); | |
subtype free_func is access_0d4008bc; | |
type struct_internal_state (<>) is limited private; | |
type struct_internal_state_ptr is access all struct_internal_state; | |
for struct_internal_state_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_internal_state_ptr); | |
pragma Convention (C, struct_internal_state_ptr); | |
type struct_z_stream_s; | |
type struct_z_stream_s is record | |
next_in : aliased zconf.Bytef_ptr; | |
avail_in : aliased zconf.uInt; | |
total_in : aliased zconf.uLong; | |
next_out : aliased zconf.Bytef_ptr; | |
avail_out : aliased zconf.uInt; | |
total_out : aliased zconf.uLong; | |
msg : aliased char_ptr; | |
state : aliased struct_internal_state_ptr; | |
zalloc : aliased alloc_func; | |
zfree : aliased free_func; | |
opaque : aliased zconf.voidpf; | |
data_type : aliased signed_int; | |
adler : aliased zconf.uLong; | |
reserved : aliased zconf.uLong; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_z_stream_s); | |
type struct_z_stream_s_ptr is access all struct_z_stream_s; | |
for struct_z_stream_s_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_z_stream_s_ptr); | |
pragma Convention (C, struct_z_stream_s_ptr); | |
subtype z_stream is struct_z_stream_s; | |
subtype z_stream_ptr is struct_z_stream_s_ptr; | |
subtype z_streamp is z_stream_ptr; | |
type struct_gz_header_s; | |
type struct_gz_header_s is record | |
text : aliased signed_int; | |
time : aliased zconf.uLong; | |
xflags : aliased signed_int; | |
os : aliased signed_int; | |
extra : aliased zconf.Bytef_ptr; | |
extra_len : aliased zconf.uInt; | |
extra_max : aliased zconf.uInt; | |
name : aliased zconf.Bytef_ptr; | |
name_max : aliased zconf.uInt; | |
comment : aliased zconf.Bytef_ptr; | |
comm_max : aliased zconf.uInt; | |
hcrc : aliased signed_int; | |
done : aliased signed_int; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_gz_header_s); | |
type struct_gz_header_s_ptr is access all struct_gz_header_s; | |
for struct_gz_header_s_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_gz_header_s_ptr); | |
pragma Convention (C, struct_gz_header_s_ptr); | |
subtype gz_header is struct_gz_header_s; | |
subtype gz_header_ptr is struct_gz_header_s_ptr; | |
subtype gz_headerp is gz_header_ptr; | |
function zlibVersion return char_const_ptr; | |
pragma Import (C, zlibVersion, "zlibVersion"); | |
function deflate (strm : access z_stream; flush : signed_int) | |
return signed_int; | |
pragma Import (C, deflate, "deflate"); | |
function deflateEnd (strm : access z_stream) return signed_int; | |
pragma Import (C, deflateEnd, "deflateEnd"); | |
function inflate (strm : access z_stream; flush : signed_int) | |
return signed_int; | |
pragma Import (C, inflate, "inflate"); | |
function inflateEnd (strm : access z_stream) return signed_int; | |
pragma Import (C, inflateEnd, "inflateEnd"); | |
function deflateSetDictionary (strm : access z_stream; | |
dictionary : access constant zconf.Bytef; dictLength : zconf.uInt) | |
return signed_int; | |
pragma Import (C, deflateSetDictionary, "deflateSetDictionary"); | |
function deflateGetDictionary (strm : access z_stream; | |
dictionary : access zconf.Bytef; dictLength : access zconf.uInt) | |
return signed_int; | |
pragma Import (C, deflateGetDictionary, "deflateGetDictionary"); | |
function deflateCopy (dest : access z_stream; source : access z_stream) | |
return signed_int; | |
pragma Import (C, deflateCopy, "deflateCopy"); | |
function deflateReset (strm : access z_stream) return signed_int; | |
pragma Import (C, deflateReset, "deflateReset"); | |
function deflateParams (strm : access z_stream; level : signed_int; | |
strategy : signed_int) return signed_int; | |
pragma Import (C, deflateParams, "deflateParams"); | |
function deflateTune (strm : access z_stream; good_length : signed_int; | |
max_lazy : signed_int; nice_length : signed_int; | |
max_chain : signed_int) return signed_int; | |
pragma Import (C, deflateTune, "deflateTune"); | |
function deflateBound (strm : access z_stream; sourceLen : zconf.uLong) | |
return zconf.uLong; | |
pragma Import (C, deflateBound, "deflateBound"); | |
function deflatePending (strm : access z_stream; | |
pending : access unsigned_int; bits : access signed_int) | |
return signed_int; | |
pragma Import (C, deflatePending, "deflatePending"); | |
function deflatePrime (strm : access z_stream; bits : signed_int; | |
value : signed_int) return signed_int; | |
pragma Import (C, deflatePrime, "deflatePrime"); | |
function deflateSetHeader (strm : access z_stream; | |
head : access gz_header) return signed_int; | |
pragma Import (C, deflateSetHeader, "deflateSetHeader"); | |
function inflateSetDictionary (strm : access z_stream; | |
dictionary : access constant zconf.Bytef; dictLength : zconf.uInt) | |
return signed_int; | |
pragma Import (C, inflateSetDictionary, "inflateSetDictionary"); | |
function inflateGetDictionary (strm : access z_stream; | |
dictionary : access zconf.Bytef; dictLength : access zconf.uInt) | |
return signed_int; | |
pragma Import (C, inflateGetDictionary, "inflateGetDictionary"); | |
function inflateSync (strm : access z_stream) return signed_int; | |
pragma Import (C, inflateSync, "inflateSync"); | |
function inflateCopy (dest : access z_stream; source : access z_stream) | |
return signed_int; | |
pragma Import (C, inflateCopy, "inflateCopy"); | |
function inflateReset (strm : access z_stream) return signed_int; | |
pragma Import (C, inflateReset, "inflateReset"); | |
function inflateReset2 (strm : access z_stream; windowBits : signed_int) | |
return signed_int; | |
pragma Import (C, inflateReset2, "inflateReset2"); | |
function inflatePrime (strm : access z_stream; bits : signed_int; | |
value : signed_int) return signed_int; | |
pragma Import (C, inflatePrime, "inflatePrime"); | |
function inflateMark (strm : access z_stream) return signed_long; | |
pragma Import (C, inflateMark, "inflateMark"); | |
function inflateGetHeader (strm : access z_stream; | |
head : access gz_header) return signed_int; | |
pragma Import (C, inflateGetHeader, "inflateGetHeader"); | |
type access_0a2ad2ad is access function (a1 : void_ptr; | |
a2 : access unsigned_char_ptr) return unsigned_int; | |
pragma Convention (C, access_0a2ad2ad); | |
subtype in_func is access_0a2ad2ad; | |
type access_aacf6e84 is access function (a1 : void_ptr; | |
a2 : access unsigned_char; a3 : unsigned_int) return signed_int; | |
pragma Convention (C, access_aacf6e84); | |
subtype out_func is access_aacf6e84; | |
function inflateBack (strm : access z_stream; A_in : in_func; | |
in_desc : void_ptr; A_out : out_func; out_desc : void_ptr) | |
return signed_int; | |
pragma Import (C, inflateBack, "inflateBack"); | |
function inflateBackEnd (strm : access z_stream) return signed_int; | |
pragma Import (C, inflateBackEnd, "inflateBackEnd"); | |
function zlibCompileFlags return zconf.uLong; | |
pragma Import (C, zlibCompileFlags, "zlibCompileFlags"); | |
function compress (dest : access zconf.Bytef; | |
destLen : access zconf.uLongf; source : access constant zconf.Bytef; | |
sourceLen : zconf.uLong) return signed_int; | |
pragma Import (C, compress, "compress"); | |
function compress2 (dest : access zconf.Bytef; | |
destLen : access zconf.uLongf; source : access constant zconf.Bytef; | |
sourceLen : zconf.uLong; level : signed_int) return signed_int; | |
pragma Import (C, compress2, "compress2"); | |
function compressBound (sourceLen : zconf.uLong) return zconf.uLong; | |
pragma Import (C, compressBound, "compressBound"); | |
function uncompress (dest : access zconf.Bytef; | |
destLen : access zconf.uLongf; source : access constant zconf.Bytef; | |
sourceLen : zconf.uLong) return signed_int; | |
pragma Import (C, uncompress, "uncompress"); | |
function uncompress2 (dest : access zconf.Bytef; | |
destLen : access zconf.uLongf; source : access constant zconf.Bytef; | |
sourceLen : access zconf.uLong) return signed_int; | |
pragma Import (C, uncompress2, "uncompress2"); | |
type struct_gzFile_s; | |
type struct_gzFile_s_ptr is access all struct_gzFile_s; | |
for struct_gzFile_s_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_gzFile_s_ptr); | |
pragma Convention (C, struct_gzFile_s_ptr); | |
subtype gzFile is struct_gzFile_s_ptr; | |
function gzdopen (fd : signed_int; mode : access constant char) | |
return gzFile; | |
pragma Import (C, gzdopen, "gzdopen"); | |
function gzbuffer (file : access struct_gzFile_s; size : unsigned_int) | |
return signed_int; | |
pragma Import (C, gzbuffer, "gzbuffer"); | |
function gzsetparams (file : access struct_gzFile_s; level : signed_int; | |
strategy : signed_int) return signed_int; | |
pragma Import (C, gzsetparams, "gzsetparams"); | |
function gzread (file : access struct_gzFile_s; buf : zconf.voidp; | |
len : unsigned_int) return signed_int; | |
pragma Import (C, gzread, "gzread"); | |
function gzfread (buf : zconf.voidp; size : zconf.z_size_t; | |
nitems : zconf.z_size_t; file : access struct_gzFile_s) | |
return zconf.z_size_t; | |
pragma Import (C, gzfread, "gzfread"); | |
function gzwrite (file : access struct_gzFile_s; buf : zconf.voidpc; | |
len : unsigned_int) return signed_int; | |
pragma Import (C, gzwrite, "gzwrite"); | |
function gzfwrite (buf : zconf.voidpc; size : zconf.z_size_t; | |
nitems : zconf.z_size_t; file : access struct_gzFile_s) | |
return zconf.z_size_t; | |
pragma Import (C, gzfwrite, "gzfwrite"); | |
function gzprintf (file : access struct_gzFile_s; | |
format : access constant char) return signed_int; | |
pragma Import (C, gzprintf, "gzprintf"); | |
function gzputs (file : access struct_gzFile_s; s : access constant char) | |
return signed_int; | |
pragma Import (C, gzputs, "gzputs"); | |
function gzgets (file : access struct_gzFile_s; buf : access char; | |
len : signed_int) return char_ptr; | |
pragma Import (C, gzgets, "gzgets"); | |
function gzputc (file : access struct_gzFile_s; c : signed_int) | |
return signed_int; | |
pragma Import (C, gzputc, "gzputc"); | |
function gzgetc (file : access struct_gzFile_s) return signed_int; | |
pragma Import (C, gzgetc, "gzgetc"); | |
function gzungetc (c : signed_int; file : access struct_gzFile_s) | |
return signed_int; | |
pragma Import (C, gzungetc, "gzungetc"); | |
function gzflush (file : access struct_gzFile_s; flush : signed_int) | |
return signed_int; | |
pragma Import (C, gzflush, "gzflush"); | |
function gzrewind (file : access struct_gzFile_s) return signed_int; | |
pragma Import (C, gzrewind, "gzrewind"); | |
function gzeof (file : access struct_gzFile_s) return signed_int; | |
pragma Import (C, gzeof, "gzeof"); | |
function gzdirect (file : access struct_gzFile_s) return signed_int; | |
pragma Import (C, gzdirect, "gzdirect"); | |
function gzclose (file : access struct_gzFile_s) return signed_int; | |
pragma Import (C, gzclose, "gzclose"); | |
function gzclose_r (file : access struct_gzFile_s) return signed_int; | |
pragma Import (C, gzclose_r, "gzclose_r"); | |
function gzclose_w (file : access struct_gzFile_s) return signed_int; | |
pragma Import (C, gzclose_w, "gzclose_w"); | |
function gzerror (file : access struct_gzFile_s; | |
errnum : access signed_int) return char_const_ptr; | |
pragma Import (C, gzerror, "gzerror"); | |
procedure gzclearerr (file : access struct_gzFile_s); | |
pragma Import (C, gzclearerr, "gzclearerr"); | |
function adler32 (adler : zconf.uLong; buf : access constant zconf.Bytef; | |
len : zconf.uInt) return zconf.uLong; | |
pragma Import (C, adler32, "adler32"); | |
function adler32_z (adler : zconf.uLong; | |
buf : access constant zconf.Bytef; len : zconf.z_size_t) | |
return zconf.uLong; | |
pragma Import (C, adler32_z, "adler32_z"); | |
function crc32 (crc : zconf.uLong; buf : access constant zconf.Bytef; | |
len : zconf.uInt) return zconf.uLong; | |
pragma Import (C, crc32, "crc32"); | |
function crc32_z (adler : zconf.uLong; buf : access constant zconf.Bytef; | |
len : zconf.z_size_t) return zconf.uLong; | |
pragma Import (C, crc32_z, "crc32_z"); | |
function deflateInitq (strm : access z_stream; level : signed_int; | |
version : access constant char; stream_size : signed_int) | |
return signed_int; | |
pragma Import (C, deflateInitq, "deflateInit_"); | |
function inflateInitq (strm : access z_stream; | |
version : access constant char; stream_size : signed_int) | |
return signed_int; | |
pragma Import (C, inflateInitq, "inflateInit_"); | |
function deflateInit2q (strm : access z_stream; level : signed_int; | |
method : signed_int; windowBits : signed_int; memLevel : signed_int; | |
strategy : signed_int; version : access constant char; | |
stream_size : signed_int) return signed_int; | |
pragma Import (C, deflateInit2q, "deflateInit2_"); | |
function inflateInit2q (strm : access z_stream; windowBits : signed_int; | |
version : access constant char; stream_size : signed_int) | |
return signed_int; | |
pragma Import (C, inflateInit2q, "inflateInit2_"); | |
function inflateBackInitq (strm : access z_stream; | |
windowBits : signed_int; window : access unsigned_char; | |
version : access constant char; stream_size : signed_int) | |
return signed_int; | |
pragma Import (C, inflateBackInitq, "inflateBackInit_"); | |
type struct_gzFile_s is record | |
have : aliased unsigned_int; | |
next : aliased unsigned_char_ptr; | |
pos : aliased sys.types.off_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_gzFile_s); | |
function gzgetcq (file : access struct_gzFile_s) return signed_int; | |
pragma Import (C, gzgetcq, "gzgetc_"); | |
function gzopen (a1 : access constant char; a2 : access constant char) | |
return gzFile; | |
pragma Import (C, gzopen, "gzopen"); | |
function gzseek (a1 : access struct_gzFile_s; a2 : sys.types.off_t; | |
a3 : signed_int) return sys.types.off_t; | |
pragma Import (C, gzseek, "gzseek"); | |
function gztell (a1 : access struct_gzFile_s) return sys.types.off_t; | |
pragma Import (C, gztell, "gztell"); | |
function gzoffset (a1 : access struct_gzFile_s) return sys.types.off_t; | |
pragma Import (C, gzoffset, "gzoffset"); | |
function adler32_combine (a1 : zconf.uLong; a2 : zconf.uLong; | |
a3 : sys.types.off_t) return zconf.uLong; | |
pragma Import (C, adler32_combine, "adler32_combine"); | |
function crc32_combine (a1 : zconf.uLong; a2 : zconf.uLong; | |
a3 : sys.types.off_t) return zconf.uLong; | |
pragma Import (C, crc32_combine, "crc32_combine"); | |
function zError (a1 : signed_int) return char_const_ptr; | |
pragma Import (C, zError, "zError"); | |
function inflateSyncPoint (a1 : access z_stream) return signed_int; | |
pragma Import (C, inflateSyncPoint, "inflateSyncPoint"); | |
function get_crc_table return zconf.z_crc_t_const_ptr; | |
pragma Import (C, get_crc_table, "get_crc_table"); | |
function inflateUndermine (a1 : access z_stream; a2 : signed_int) | |
return signed_int; | |
pragma Import (C, inflateUndermine, "inflateUndermine"); | |
function inflateValidate (a1 : access z_stream; a2 : signed_int) | |
return signed_int; | |
pragma Import (C, inflateValidate, "inflateValidate"); | |
function inflateCodesUsed (a1 : access z_stream) return unsigned_long; | |
pragma Import (C, inflateCodesUsed, "inflateCodesUsed"); | |
function inflateResetKeep (a1 : access z_stream) return signed_int; | |
pragma Import (C, inflateResetKeep, "inflateResetKeep"); | |
function deflateResetKeep (a1 : access z_stream) return signed_int; | |
pragma Import (C, deflateResetKeep, "deflateResetKeep"); | |
function gzvprintf (file : access struct_gzFile_s; | |
format : access constant char; va : stdarg.va_list) return signed_int; | |
pragma Import (C, gzvprintf, "gzvprintf"); | |
-- ZLIB_H (empty) | |
ZLIB_VERNUM : constant := 4784; | |
ZLIB_VERSION : constant char_array (0 .. 6) := "1.2.11" & char'Val (0); | |
ZLIB_VER_MAJOR : constant := 1; | |
ZLIB_VER_MINOR : constant := 2; | |
ZLIB_VER_REVISION : constant := 11; | |
ZLIB_VER_SUBREVISION : constant := 0; | |
Z_ASCII : constant := 1; | |
Z_BEST_COMPRESSION : constant := 9; | |
Z_BEST_SPEED : constant := 1; | |
Z_BINARY : constant := 0; | |
Z_BLOCK : constant := 5; | |
Z_BUF_ERROR : constant := -5; | |
Z_DATA_ERROR : constant := -3; | |
Z_DEFAULT_COMPRESSION : constant := -1; | |
Z_DEFAULT_STRATEGY : constant := 0; | |
Z_DEFLATED : constant := 8; | |
Z_ERRNO : constant := -1; | |
Z_FILTERED : constant := 1; | |
Z_FINISH : constant := 4; | |
Z_FIXED : constant := 4; | |
Z_FULL_FLUSH : constant := 3; | |
Z_HUFFMAN_ONLY : constant := 2; | |
Z_MEM_ERROR : constant := -4; | |
Z_NEED_DICT : constant := 2; | |
Z_NO_COMPRESSION : constant := 0; | |
Z_NO_FLUSH : constant := 0; | |
Z_NULL : constant := 0; | |
Z_OK : constant := 0; | |
Z_PARTIAL_FLUSH : constant := 1; | |
Z_RLE : constant := 3; | |
Z_STREAM_END : constant := 1; | |
Z_STREAM_ERROR : constant := -2; | |
Z_SYNC_FLUSH : constant := 2; | |
Z_TEXT : constant := 1; | |
Z_TREES : constant := 6; | |
Z_UNKNOWN : constant := 2; | |
Z_VERSION_ERROR : constant := -6; | |
-- deflateInit (function macro) | |
-- deflateInit2 (function macro) | |
-- inflateBackInit (function macro) | |
-- inflateInit (function macro) | |
-- inflateInit2 (function macro) | |
function get_zlib_version return char_const_ptr; | |
pragma Inline_Always (get_zlib_version); | |
private | |
type struct_internal_state is null record; | |
end C.zlib; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.31-1157199 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
with System; | |
package C is | |
pragma Preelaborate; | |
-- type void (<>) is limited private; | |
type bool is new Boolean; | |
pragma Convention (C, bool); | |
type signed_char is new Short_Short_Integer; | |
pragma Convention (C, signed_char); | |
type unsigned_char is mod 2 ** signed_char'Size; | |
pragma Convention (C, unsigned_char); | |
type signed_short is new Short_Integer; | |
pragma Convention (C, signed_short); | |
type unsigned_short is mod 2 ** signed_short'Size; | |
pragma Convention (C, unsigned_short); | |
type signed_int is new Integer; | |
pragma Convention (C, signed_int); | |
type unsigned_int is mod 2 ** signed_int'Size; | |
pragma Convention (C, unsigned_int); | |
type signed_long is new Long_Integer; | |
pragma Convention (C, signed_long); | |
type unsigned_long is mod 2 ** signed_long'Size; | |
pragma Convention (C, unsigned_long); | |
type signed_long_long is new Long_Long_Integer; | |
pragma Convention (C, signed_long_long); | |
type unsigned_long_long is mod 2 ** signed_long_long'Size; | |
pragma Convention (C, unsigned_long_long); | |
type float is new Standard.Float; | |
pragma Convention (C, float); | |
type double is new Long_Float; | |
pragma Convention (C, double); | |
type long_double is new Long_Long_Float; | |
pragma Convention (C, long_double); | |
-- type Float32 is ... | |
-- type Float64 is ... | |
-- type Float128 is ... | |
-- type Float32x is ... | |
-- type Float64x is ... | |
-- type Decimal32 is ... | |
-- type Decimal64 is ... | |
-- type Decimal128 is ... | |
type float_imaginary is new float; | |
pragma Convention (C, float_imaginary); | |
type double_imaginary is new double; | |
pragma Convention (C, double_imaginary); | |
type long_double_imaginary is new long_double; | |
pragma Convention (C, long_double_imaginary); | |
-- type Float32_imaginary is ... | |
-- type Float32x_imaginary is ... | |
-- type Float64_imaginary is ... | |
-- type Float64x_imaginary is ... | |
-- type Float128_imaginary is ... | |
type float_complex is record | |
Re, Im : float'Base; | |
end record; | |
pragma Complex_Representation (float_complex); | |
pragma Convention (C, float_complex); | |
type double_complex is record | |
Re, Im : double'Base; | |
end record; | |
pragma Complex_Representation (double_complex); | |
pragma Convention (C, double_complex); | |
type long_double_complex is record | |
Re, Im : long_double'Base; | |
end record; | |
pragma Complex_Representation (long_double_complex); | |
pragma Convention (C, long_double_complex); | |
-- type Float32_complex is ... | |
-- type Float32x_complex is ... | |
-- type Float64_complex is ... | |
-- type Float64x_complex is ... | |
-- type Float128_complex is ... | |
type char is new Character; | |
type int128_t is record | |
Lo, Hi : unsigned_long_long; | |
end record; | |
pragma Convention (C_Pass_By_Copy, int128_t); | |
type uint128_t is record | |
Lo, Hi : unsigned_long_long; | |
end record; | |
pragma Convention (C_Pass_By_Copy, uint128_t); | |
subtype builtin_va_list is System.Address; | |
type ptrdiff_t is new signed_long; | |
type size_t is new unsigned_long; | |
type wchar_t is new signed_int; | |
subtype void_ptr is System.Address; | |
subtype void_const_ptr is System.Address; | |
type unsigned_char_array is array (size_t range <>) of | |
aliased unsigned_char; | |
pragma Convention (C, unsigned_char_array); | |
type unsigned_char_ptr is access all unsigned_char; | |
for unsigned_char_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (unsigned_char_ptr); | |
pragma Convention (C, unsigned_char_ptr); | |
type unsigned_char_const_ptr is access constant unsigned_char; | |
for unsigned_char_const_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (unsigned_char_const_ptr); | |
pragma Convention (C, unsigned_char_const_ptr); | |
type unsigned_char_ptr_ptr is access all unsigned_char_ptr; | |
for unsigned_char_ptr_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (unsigned_char_ptr_ptr); | |
pragma Convention (C, unsigned_char_ptr_ptr); | |
type unsigned_short_const_ptr is access constant unsigned_short; | |
for unsigned_short_const_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (unsigned_short_const_ptr); | |
pragma Convention (C, unsigned_short_const_ptr); | |
type unsigned_short_ptr is access all unsigned_short; | |
for unsigned_short_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (unsigned_short_ptr); | |
pragma Convention (C, unsigned_short_ptr); | |
type signed_int_const_ptr is access constant signed_int; | |
for signed_int_const_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (signed_int_const_ptr); | |
pragma Convention (C, signed_int_const_ptr); | |
type signed_int_array is array (size_t range <>) of aliased signed_int; | |
pragma Convention (C, signed_int_array); | |
type signed_int_volatile is new signed_int; | |
pragma Volatile (signed_int_volatile); | |
type signed_int_ptr is access all signed_int; | |
for signed_int_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (signed_int_ptr); | |
pragma Convention (C, signed_int_ptr); | |
type unsigned_int_array is array (size_t range <>) of | |
aliased unsigned_int; | |
pragma Convention (C, unsigned_int_array); | |
type unsigned_int_ptr is access all unsigned_int; | |
for unsigned_int_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (unsigned_int_ptr); | |
pragma Convention (C, unsigned_int_ptr); | |
type unsigned_int_const_ptr is access constant unsigned_int; | |
for unsigned_int_const_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (unsigned_int_const_ptr); | |
pragma Convention (C, unsigned_int_const_ptr); | |
type signed_long_ptr is access all signed_long; | |
for signed_long_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (signed_long_ptr); | |
pragma Convention (C, signed_long_ptr); | |
type signed_long_array is array (size_t range <>) of aliased signed_long; | |
pragma Convention (C, signed_long_array); | |
type unsigned_long_array is array (size_t range <>) of | |
aliased unsigned_long; | |
pragma Convention (C, unsigned_long_array); | |
type unsigned_long_ptr is access all unsigned_long; | |
for unsigned_long_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (unsigned_long_ptr); | |
pragma Convention (C, unsigned_long_ptr); | |
type char_ptr is access all char; | |
for char_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (char_ptr); | |
pragma Convention (C, char_ptr); | |
type char_ptr_ptr is access all char_ptr; | |
for char_ptr_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (char_ptr_ptr); | |
pragma Convention (C, char_ptr_ptr); | |
type char_ptr_array is array (size_t range <>) of aliased char_ptr; | |
pragma Convention (C, char_ptr_array); | |
type char_const_ptr is access constant char; | |
for char_const_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (char_const_ptr); | |
pragma Convention (C, char_const_ptr); | |
type char_const_ptr_array is array (size_t range <>) of | |
aliased char_const_ptr; | |
pragma Convention (C, char_const_ptr_array); | |
type char_array is array (size_t range <>) of aliased char; | |
pragma Convention (C, char_array); | |
function "=" (Left, Right : System.Address) return Boolean | |
renames System."="; | |
function Shift_Left (Left : signed_char; Right : Natural) | |
return signed_char; | |
function Shift_Right_Arithmetic (Left : signed_char; Right : Natural) | |
return signed_char; | |
function Shift_Left (Left : unsigned_char; Right : Natural) | |
return unsigned_char; | |
function Shift_Right (Left : unsigned_char; Right : Natural) | |
return unsigned_char; | |
function Shift_Left (Left : signed_short; Right : Natural) | |
return signed_short; | |
function Shift_Right_Arithmetic (Left : signed_short; Right : Natural) | |
return signed_short; | |
function Shift_Left (Left : unsigned_short; Right : Natural) | |
return unsigned_short; | |
function Shift_Right (Left : unsigned_short; Right : Natural) | |
return unsigned_short; | |
function Shift_Left (Left : signed_int; Right : Natural) | |
return signed_int; | |
function Shift_Right_Arithmetic (Left : signed_int; Right : Natural) | |
return signed_int; | |
function Shift_Left (Left : unsigned_int; Right : Natural) | |
return unsigned_int; | |
function Shift_Right (Left : unsigned_int; Right : Natural) | |
return unsigned_int; | |
function Shift_Left (Left : signed_long; Right : Natural) | |
return signed_long; | |
function Shift_Right_Arithmetic (Left : signed_long; Right : Natural) | |
return signed_long; | |
function Shift_Left (Left : unsigned_long; Right : Natural) | |
return unsigned_long; | |
function Shift_Right (Left : unsigned_long; Right : Natural) | |
return unsigned_long; | |
function Shift_Left (Left : signed_long_long; Right : Natural) | |
return signed_long_long; | |
function Shift_Right_Arithmetic (Left : signed_long_long; Right : Natural) | |
return signed_long_long; | |
function Shift_Left (Left : unsigned_long_long; Right : Natural) | |
return unsigned_long_long; | |
function Shift_Right (Left : unsigned_long_long; Right : Natural) | |
return unsigned_long_long; | |
pragma Import (Intrinsic, Shift_Left); | |
pragma Import (Intrinsic, Shift_Right); | |
pragma Import (Intrinsic, Shift_Right_Arithmetic); | |
LP64 : constant := 1; | |
STDC_PREDEF_H : constant := 1; | |
ATOMIC_ACQUIRE : constant := 2; | |
ATOMIC_ACQ_REL : constant := 4; | |
ATOMIC_CONSUME : constant := 1; | |
ATOMIC_HLE_ACQUIRE : constant := 65536; | |
ATOMIC_HLE_RELEASE : constant := 131072; | |
ATOMIC_RELAXED : constant := 0; | |
ATOMIC_RELEASE : constant := 3; | |
ATOMIC_SEQ_CST : constant := 5; | |
qqBIGGEST_ALIGNMENTqq : constant := 16; | |
qqBYTE_ORDERqq : constant := 1234; | |
subtype qqCHAR16_TYPEqq is unsigned_short; | |
subtype qqCHAR32_TYPEqq is unsigned_int; | |
qqCHAR_BITqq : constant := 8; | |
qqDBL_DECIMAL_DIGqq : constant := 17; | |
qqDBL_DENORM_MINqq : constant := 16#0.40000000000000000#e-268; | |
qqDBL_DIGqq : constant := 15; | |
qqDBL_EPSILONqq : constant := 16#0.10000000000000000#e-12; | |
qqDBL_HAS_DENORMqq : constant := 1; | |
qqDBL_HAS_INFINITYqq : constant := 1; | |
qqDBL_HAS_QUIET_NANqq : constant := 1; | |
qqDBL_MANT_DIGqq : constant := 53; | |
qqDBL_MAX_10_EXPqq : constant := 308; | |
qqDBL_MAX_EXPqq : constant := 1024; | |
qqDBL_MAXqq : constant := 16#0.fffffffffffff8000#e+256; | |
qqDBL_MIN_10_EXPqq : constant := -307; | |
qqDBL_MIN_EXPqq : constant := -1021; | |
qqDBL_MINqq : constant := 16#0.40000000000000000#e-255; | |
-- qqDEC128_EPSILONqq (decimal) | |
qqDEC128_MANT_DIGqq : constant := 34; | |
qqDEC128_MAX_EXPqq : constant := 6145; | |
-- qqDEC128_MAXqq (decimal) | |
qqDEC128_MIN_EXPqq : constant := -6142; | |
-- qqDEC128_MINqq (decimal) | |
-- qqDEC128_SUBNORMAL_MINqq (decimal) | |
-- qqDEC32_EPSILONqq (decimal) | |
qqDEC32_MANT_DIGqq : constant := 7; | |
qqDEC32_MAX_EXPqq : constant := 97; | |
-- qqDEC32_MAXqq (decimal) | |
qqDEC32_MIN_EXPqq : constant := -94; | |
-- qqDEC32_MINqq (decimal) | |
-- qqDEC32_SUBNORMAL_MINqq (decimal) | |
-- qqDEC64_EPSILONqq (decimal) | |
qqDEC64_MANT_DIGqq : constant := 16; | |
qqDEC64_MAX_EXPqq : constant := 385; | |
-- qqDEC64_MAXqq (decimal) | |
qqDEC64_MIN_EXPqq : constant := -382; | |
-- qqDEC64_MINqq (decimal) | |
-- qqDEC64_SUBNORMAL_MINqq (decimal) | |
qqDECIMAL_BID_FORMATqq : constant := 1; | |
qqDECIMAL_DIGqq : constant := 21; | |
qqDEC_EVAL_METHODqq : constant := 2; | |
qqELFqq : constant := 1; | |
qqFINITE_MATH_ONLYqq : constant := 0; | |
qqFLOAT_WORD_ORDERqq : constant := 1234; | |
qqFLT_DECIMAL_DIGqq : constant := 9; | |
qqFLT_DENORM_MINqq : constant := 16#0.80000000000000000#e-37; | |
qqFLT_DIGqq : constant := 6; | |
qqFLT_EPSILONqq : constant := 16#0.20000000000000000#e-5; | |
qqFLT_EVAL_METHODqq : constant := 0; | |
qqFLT_HAS_DENORMqq : constant := 1; | |
qqFLT_HAS_INFINITYqq : constant := 1; | |
qqFLT_HAS_QUIET_NANqq : constant := 1; | |
qqFLT_MANT_DIGqq : constant := 24; | |
qqFLT_MAX_10_EXPqq : constant := 38; | |
qqFLT_MAX_EXPqq : constant := 128; | |
qqFLT_MAXqq : constant := 16#0.ffffff00000000000#e+32; | |
qqFLT_MIN_10_EXPqq : constant := -37; | |
qqFLT_MIN_EXPqq : constant := -125; | |
qqFLT_MINqq : constant := 16#0.40000000000000000#e-31; | |
qqFLT_RADIXqq : constant := 2; | |
qqFXSRqq : constant := 1; | |
qqGCC_ASM_FLAG_OUTPUTSqq : constant := 1; | |
GCC_ATOMIC_BOOL_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_CHAR16_T_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_CHAR32_T_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_CHAR_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_INT_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_LLONG_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_LONG_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_POINTER_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_SHORT_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_TEST_AND_SET_TRUEVAL : constant := 1; | |
GCC_ATOMIC_WCHAR_T_LOCK_FREE : constant := 2; | |
GCC_HAVE_DWARF2_CFI_ASM : constant := 1; | |
GCC_HAVE_SYNC_COMPARE_AND_SWAP_1 : constant := 1; | |
GCC_HAVE_SYNC_COMPARE_AND_SWAP_16 : constant := 1; | |
GCC_HAVE_SYNC_COMPARE_AND_SWAP_2 : constant := 1; | |
GCC_HAVE_SYNC_COMPARE_AND_SWAP_4 : constant := 1; | |
GCC_HAVE_SYNC_COMPARE_AND_SWAP_8 : constant := 1; | |
GCC_IEC_559 : constant := 2; | |
GCC_IEC_559_COMPLEX : constant := 2; | |
qqGNUC_MINORqq : constant := 5; | |
qqGNUC_PATCHLEVELqq : constant := 0; | |
qqGNUC_STDC_INLINEqq : constant := 1; | |
qqGNUCqq : constant := 6; | |
GXX_ABI_VERSION : constant := 1010; | |
-- __INT16_C (function macro) | |
qqINT16_MAXqq : constant := 32767; | |
subtype qqINT16_TYPEqq is signed_short; | |
-- __INT32_C (function macro) | |
qqINT32_MAXqq : constant := 2147483647; | |
subtype qqINT32_TYPEqq is signed_int; | |
-- __INT64_C (has # or ##) | |
qqINT64_MAXqq : constant := 9223372036854775807; | |
subtype qqINT64_TYPEqq is signed_long; | |
-- __INT8_C (function macro) | |
qqINT8_MAXqq : constant := 127; | |
subtype qqINT8_TYPEqq is signed_char; | |
-- __INTMAX_C (has # or ##) | |
qqINTMAX_MAXqq : constant := 9223372036854775807; | |
subtype qqINTMAX_TYPEqq is signed_long; | |
qqINTPTR_MAXqq : constant := 9223372036854775807; | |
subtype qqINTPTR_TYPEqq is signed_long; | |
qqINT_FAST16_MAXqq : constant := 9223372036854775807; | |
subtype qqINT_FAST16_TYPEqq is signed_long; | |
qqINT_FAST32_MAXqq : constant := 9223372036854775807; | |
subtype qqINT_FAST32_TYPEqq is signed_long; | |
qqINT_FAST64_MAXqq : constant := 9223372036854775807; | |
subtype qqINT_FAST64_TYPEqq is signed_long; | |
qqINT_FAST8_MAXqq : constant := 127; | |
subtype qqINT_FAST8_TYPEqq is signed_char; | |
qqINT_LEAST16_MAXqq : constant := 32767; | |
subtype qqINT_LEAST16_TYPEqq is signed_short; | |
qqINT_LEAST32_MAXqq : constant := 2147483647; | |
subtype qqINT_LEAST32_TYPEqq is signed_int; | |
qqINT_LEAST64_MAXqq : constant := 9223372036854775807; | |
subtype qqINT_LEAST64_TYPEqq is signed_long; | |
qqINT_LEAST8_MAXqq : constant := 127; | |
subtype qqINT_LEAST8_TYPEqq is signed_char; | |
qqINT_MAXqq : constant := 2147483647; | |
qqLDBL_DENORM_MINqq : constant := 16#0.80000000000000000#e-4111; | |
qqLDBL_DIGqq : constant := 18; | |
qqLDBL_EPSILONqq : constant := 16#0.20000000000000000#e-15; | |
qqLDBL_HAS_DENORMqq : constant := 1; | |
qqLDBL_HAS_INFINITYqq : constant := 1; | |
qqLDBL_HAS_QUIET_NANqq : constant := 1; | |
qqLDBL_MANT_DIGqq : constant := 64; | |
qqLDBL_MAX_10_EXPqq : constant := 4932; | |
qqLDBL_MAX_EXPqq : constant := 16384; | |
qqLDBL_MAXqq : constant := 16#0.ffffffffffffffff0#e+4096; | |
qqLDBL_MIN_10_EXPqq : constant := -4931; | |
qqLDBL_MIN_EXPqq : constant := -16381; | |
qqLDBL_MINqq : constant := 16#0.40000000000000000#e-4095; | |
qqLONG_LONG_MAXqq : constant := 9223372036854775807; | |
qqLONG_MAXqq : constant := 9223372036854775807; | |
qqLP64qq : constant := 1; | |
qqMMXqq : constant := 1; | |
qqNO_INLINEqq : constant := 1; | |
qqORDER_BIG_ENDIANqq : constant := 4321; | |
qqORDER_LITTLE_ENDIANqq : constant := 1234; | |
qqORDER_PDP_ENDIANqq : constant := 3412; | |
PRAGMA_REDEFINE_EXTNAME : constant := 1; | |
qqPTRDIFF_MAXqq : constant := 9223372036854775807; | |
subtype qqPTRDIFF_TYPEqq is signed_long; | |
-- __REGISTER_PREFIX__ (empty) | |
qqSCHAR_MAXqq : constant := 127; | |
SEG_FS : constant := 1; | |
SEG_GS : constant := 1; | |
qqSHRT_MAXqq : constant := 32767; | |
qqSIG_ATOMIC_MAXqq : constant := 2147483647; | |
qqSIG_ATOMIC_MINqq : constant := -2147483648; | |
subtype qqSIG_ATOMIC_TYPEqq is signed_int; | |
qqSIZEOF_DOUBLEqq : constant := 8; | |
qqSIZEOF_FLOAT128qq : constant := 16; | |
qqSIZEOF_FLOAT80qq : constant := 16; | |
qqSIZEOF_FLOATqq : constant := 4; | |
qqSIZEOF_INT128qq : constant := 16; | |
qqSIZEOF_INTqq : constant := 4; | |
qqSIZEOF_LONG_DOUBLEqq : constant := 16; | |
qqSIZEOF_LONG_LONGqq : constant := 8; | |
qqSIZEOF_LONGqq : constant := 8; | |
qqSIZEOF_POINTERqq : constant := 8; | |
qqSIZEOF_PTRDIFF_Tqq : constant := 8; | |
qqSIZEOF_SHORTqq : constant := 2; | |
qqSIZEOF_SIZE_Tqq : constant := 8; | |
qqSIZEOF_WCHAR_Tqq : constant := 4; | |
qqSIZEOF_WINT_Tqq : constant := 4; | |
qqSIZE_MAXqq : constant := 18446744073709551615; | |
subtype qqSIZE_TYPEqq is unsigned_long; | |
qqSSE2_MATHqq : constant := 1; | |
qqSSE2qq : constant := 1; | |
qqSSE3qq : constant := 1; | |
qqSSE_MATHqq : constant := 1; | |
qqSSEqq : constant := 1; | |
qqSSSE3qq : constant := 1; | |
qqSTDC_HOSTEDqq : constant := 1; | |
qqSTDC_NO_THREADSqq : constant := 1; | |
qqSTDC_UTF_16qq : constant := 1; | |
qqSTDC_UTF_32qq : constant := 1; | |
-- __UINT16_C (function macro) | |
qqUINT16_MAXqq : constant := 65535; | |
subtype qqUINT16_TYPEqq is unsigned_short; | |
-- __UINT32_C (has # or ##) | |
qqUINT32_MAXqq : constant := 4294967295; | |
subtype qqUINT32_TYPEqq is unsigned_int; | |
-- __UINT64_C (has # or ##) | |
qqUINT64_MAXqq : constant := 18446744073709551615; | |
subtype qqUINT64_TYPEqq is unsigned_long; | |
-- __UINT8_C (function macro) | |
qqUINT8_MAXqq : constant := 255; | |
subtype qqUINT8_TYPEqq is unsigned_char; | |
-- __UINTMAX_C (has # or ##) | |
qqUINTMAX_MAXqq : constant := 18446744073709551615; | |
subtype qqUINTMAX_TYPEqq is unsigned_long; | |
qqUINTPTR_MAXqq : constant := 18446744073709551615; | |
subtype qqUINTPTR_TYPEqq is unsigned_long; | |
qqUINT_FAST16_MAXqq : constant := 18446744073709551615; | |
subtype qqUINT_FAST16_TYPEqq is unsigned_long; | |
qqUINT_FAST32_MAXqq : constant := 18446744073709551615; | |
subtype qqUINT_FAST32_TYPEqq is unsigned_long; | |
qqUINT_FAST64_MAXqq : constant := 18446744073709551615; | |
subtype qqUINT_FAST64_TYPEqq is unsigned_long; | |
qqUINT_FAST8_MAXqq : constant := 255; | |
subtype qqUINT_FAST8_TYPEqq is unsigned_char; | |
qqUINT_LEAST16_MAXqq : constant := 65535; | |
subtype qqUINT_LEAST16_TYPEqq is unsigned_short; | |
qqUINT_LEAST32_MAXqq : constant := 4294967295; | |
subtype qqUINT_LEAST32_TYPEqq is unsigned_int; | |
qqUINT_LEAST64_MAXqq : constant := 18446744073709551615; | |
subtype qqUINT_LEAST64_TYPEqq is unsigned_long; | |
qqUINT_LEAST8_MAXqq : constant := 255; | |
subtype qqUINT_LEAST8_TYPEqq is unsigned_char; | |
-- __USER_LABEL_PREFIX__ (empty) | |
qqVERSIONqq : constant char_array (0 .. 5) := "6.5.0" & char'Val (0); | |
qqWCHAR_MAXqq : constant := 2147483647; | |
qqWCHAR_MINqq : constant := -2147483648; | |
subtype qqWCHAR_TYPEqq is signed_int; | |
qqWINT_MAXqq : constant := 4294967295; | |
qqWINT_MINqq : constant := 0; | |
subtype qqWINT_TYPEqq is unsigned_int; | |
amd64 : constant := 1; | |
qqamd64qq : constant := 1; | |
qqcode_model_smallqq : constant := 1; | |
core2 : constant := 1; | |
qqcore2qq : constant := 1; | |
qqgnu_linuxqq : constant := 1; | |
-- __has_include (has __has_include__ or __has_include_next__) | |
-- __has_include_next (has __has_include__ or __has_include_next__) | |
defined_qqlinux : constant := 1; | |
qqlinuxqq : constant := 1; | |
qqunix : constant := 1; | |
qqunixqq : constant := 1; | |
x86_64 : constant := 1; | |
qqx86_64qq : constant := 1; | |
defined_linux : constant := 1; | |
unix : constant := 1; | |
function builtin_alloca (a1 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_alloca, "__builtin_alloca"); | |
function builtin_bswap16 (a1 : unsigned_short) return unsigned_short; | |
pragma Import (Intrinsic, builtin_bswap16, "__builtin_bswap16"); | |
function builtin_bswap32 (a1 : unsigned_int) return unsigned_int; | |
pragma Import (Intrinsic, builtin_bswap32, "__builtin_bswap32"); | |
function builtin_bswap64 (a1 : unsigned_long_long) | |
return unsigned_long_long; | |
pragma Import (Intrinsic, builtin_bswap64, "__builtin_bswap64"); | |
procedure builtin_bzero (a1 : access char; a2 : size_t); | |
pragma Import (Intrinsic, builtin_bzero, "__builtin_bzero"); | |
function builtin_extract_return_addr (a1 : access char) return char_ptr; | |
pragma Import (Intrinsic, builtin_extract_return_addr, | |
"__builtin_extract_return_addr"); | |
function builtin_fabsf (a1 : float) return float; | |
pragma Import (Intrinsic, builtin_fabsf, "__builtin_fabsf"); | |
function builtin_fabs (a1 : double) return double; | |
pragma Import (Intrinsic, builtin_fabs, "__builtin_fabs"); | |
function builtin_fabsl (a1 : long_double) return long_double; | |
pragma Import (Intrinsic, builtin_fabsl, "__builtin_fabsl"); | |
function builtin_flt_rounds return signed_int; | |
pragma Import (Intrinsic, builtin_flt_rounds, "__builtin_flt_rounds"); | |
function builtin_frame_address (a1 : unsigned_int) return char_ptr; | |
pragma Import (Intrinsic, builtin_frame_address, | |
"__builtin_frame_address"); | |
function builtin_huge_valf return float; | |
pragma Import (Intrinsic, builtin_huge_valf, "__builtin_huge_valf"); | |
function builtin_huge_val return double; | |
pragma Import (Intrinsic, builtin_huge_val, "__builtin_huge_val"); | |
function builtin_huge_vall return long_double; | |
pragma Import (Intrinsic, builtin_huge_vall, "__builtin_huge_vall"); | |
function builtin_inff return float; | |
pragma Import (Intrinsic, builtin_inff, "__builtin_inff"); | |
function builtin_inf return double; | |
pragma Import (Intrinsic, builtin_inf, "__builtin_inf"); | |
function builtin_infl return long_double; | |
pragma Import (Intrinsic, builtin_infl, "__builtin_infl"); | |
function builtin_llabs (a1 : signed_long_long) return signed_long_long; | |
pragma Import (Intrinsic, builtin_llabs, "__builtin_llabs"); | |
function builtin_memcmp (a1 : access char; a2 : access char; a3 : size_t) | |
return signed_int; | |
pragma Import (Intrinsic, builtin_memcmp, "__builtin_memcmp"); | |
function builtin_memset (a1 : access char; a2 : signed_int; a3 : size_t) | |
return char_ptr; | |
pragma Import (Intrinsic, builtin_memset, "__builtin_memset"); | |
function builtin_memcpy_chk (a1 : access char; a2 : access constant char; | |
a3 : size_t; a4 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_memcpy_chk, "__builtin___memcpy_chk"); | |
function builtin_memmove_chk (a1 : access char; a2 : access constant char; | |
a3 : size_t; a4 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_memmove_chk, "__builtin___memmove_chk"); | |
function builtin_memset_chk (a1 : access char; a2 : signed_int; | |
a3 : size_t; a4 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_memset_chk, "__builtin___memset_chk"); | |
function builtin_nanf (a1 : access constant char) return float; | |
pragma Import (Intrinsic, builtin_nanf, "__builtin_nanf"); | |
function builtin_nan (a1 : access constant char) return double; | |
pragma Import (Intrinsic, builtin_nan, "__builtin_nan"); | |
function builtin_nanl (a1 : access constant char) return long_double; | |
pragma Import (Intrinsic, builtin_nanl, "__builtin_nanl"); | |
function builtin_return_address (a1 : unsigned_int) return char_ptr; | |
pragma Import (Intrinsic, builtin_return_address, | |
"__builtin_return_address"); | |
function builtin_stpcpy_chk (a1 : access char; a2 : access constant char; | |
a3 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_stpcpy_chk, "__builtin___stpcpy_chk"); | |
function builtin_stpncpy_chk (a1 : access char; a2 : access constant char; | |
a3 : size_t; a4 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_stpncpy_chk, "__builtin___stpncpy_chk"); | |
function builtin_strcat_chk (a1 : access char; a2 : access constant char; | |
a3 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_strcat_chk, "__builtin___strcat_chk"); | |
function builtin_strcpy_chk (a1 : access char; a2 : access constant char; | |
a3 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_strcpy_chk, "__builtin___strcpy_chk"); | |
function builtin_strncat_chk (a1 : access char; a2 : access constant char; | |
a3 : size_t; a4 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_strncat_chk, "__builtin___strncat_chk"); | |
function builtin_strncpy_chk (a1 : access char; a2 : access constant char; | |
a3 : size_t; a4 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_strncpy_chk, "__builtin___strncpy_chk"); | |
end C; |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment