Skip to content

Instantly share code, notes, and snippets.

@ytomino
Last active March 17, 2022 07:15
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save ytomino/290d0e8f987745838df15ff6b8d1c8c2 to your computer and use it in GitHub Desktop.
Save ytomino/290d0e8f987745838df15ff6b8d1c8c2 to your computer and use it in GitHub Desktop.
iconv (glibc) in x86_64-linux-gnu
-- 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.asm_generic.errno is
pragma Preelaborate;
EADDRINUSE : constant := 98;
EADDRNOTAVAIL : constant := 99;
EADV : constant := 68;
EAFNOSUPPORT : constant := 97;
EALREADY : constant := 114;
EBADE : constant := 52;
EBADFD : constant := 77;
EBADMSG : constant := 74;
EBADR : constant := 53;
EBADRQC : constant := 56;
EBADSLT : constant := 57;
EBFONT : constant := 59;
ECANCELED : constant := 125;
ECHRNG : constant := 44;
ECOMM : constant := 70;
ECONNABORTED : constant := 103;
ECONNREFUSED : constant := 111;
ECONNRESET : constant := 104;
EDEADLK : constant := 35;
EDEADLOCK : constant := 35;
EDESTADDRREQ : constant := 89;
EDOTDOT : constant := 73;
EDQUOT : constant := 122;
EHOSTDOWN : constant := 112;
EHOSTUNREACH : constant := 113;
EHWPOISON : constant := 133;
EIDRM : constant := 43;
EILSEQ : constant := 84;
EINPROGRESS : constant := 115;
EISCONN : constant := 106;
EISNAM : constant := 120;
EKEYEXPIRED : constant := 127;
EKEYREJECTED : constant := 129;
EKEYREVOKED : constant := 128;
EL2HLT : constant := 51;
EL2NSYNC : constant := 45;
EL3HLT : constant := 46;
EL3RST : constant := 47;
ELIBACC : constant := 79;
ELIBBAD : constant := 80;
ELIBEXEC : constant := 83;
ELIBMAX : constant := 82;
ELIBSCN : constant := 81;
ELNRNG : constant := 48;
ELOOP : constant := 40;
EMEDIUMTYPE : constant := 124;
EMSGSIZE : constant := 90;
EMULTIHOP : constant := 72;
ENAMETOOLONG : constant := 36;
ENAVAIL : constant := 119;
ENETDOWN : constant := 100;
ENETRESET : constant := 102;
ENETUNREACH : constant := 101;
ENOANO : constant := 55;
ENOBUFS : constant := 105;
ENOCSI : constant := 50;
ENODATA : constant := 61;
ENOKEY : constant := 126;
ENOLCK : constant := 37;
ENOLINK : constant := 67;
ENOMEDIUM : constant := 123;
ENOMSG : constant := 42;
ENONET : constant := 64;
ENOPKG : constant := 65;
ENOPROTOOPT : constant := 92;
ENOSR : constant := 63;
ENOSTR : constant := 60;
ENOSYS : constant := 38;
ENOTCONN : constant := 107;
ENOTEMPTY : constant := 39;
ENOTNAM : constant := 118;
ENOTRECOVERABLE : constant := 131;
ENOTSOCK : constant := 88;
ENOTUNIQ : constant := 76;
EOPNOTSUPP : constant := 95;
EOVERFLOW : constant := 75;
EOWNERDEAD : constant := 130;
EPFNOSUPPORT : constant := 96;
EPROTO : constant := 71;
EPROTONOSUPPORT : constant := 93;
EPROTOTYPE : constant := 91;
EREMCHG : constant := 78;
EREMOTE : constant := 66;
EREMOTEIO : constant := 121;
ERESTART : constant := 85;
ERFKILL : constant := 132;
ESHUTDOWN : constant := 108;
ESOCKTNOSUPPORT : constant := 94;
ESRMNT : constant := 69;
ESTALE : constant := 116;
ESTRPIPE : constant := 86;
ETIME : constant := 62;
ETIMEDOUT : constant := 110;
ETOOMANYREFS : constant := 109;
EUCLEAN : constant := 117;
EUNATCH : constant := 49;
EUSERS : constant := 87;
EWOULDBLOCK : constant := 11;
EXFULL : constant := 54;
-- _ASM_GENERIC_ERRNO_H (empty)
end C.asm_generic.errno;
-- 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.asm_generic.errno_base is
pragma Preelaborate;
E2BIG : constant := 7;
EACCES : constant := 13;
EAGAIN : constant := 11;
EBADF : constant := 9;
EBUSY : constant := 16;
ECHILD : constant := 10;
EDOM : constant := 33;
EEXIST : constant := 17;
EFAULT : constant := 14;
EFBIG : constant := 27;
EINTR : constant := 4;
EINVAL : constant := 22;
EIO : constant := 5;
EISDIR : constant := 21;
EMFILE : constant := 24;
EMLINK : constant := 31;
ENFILE : constant := 23;
ENODEV : constant := 19;
ENOENT : constant := 2;
ENOEXEC : constant := 8;
ENOMEM : constant := 12;
ENOSPC : constant := 28;
ENOTBLK : constant := 15;
ENOTDIR : constant := 20;
ENOTTY : constant := 25;
ENXIO : constant := 6;
EPERM : constant := 1;
EPIPE : constant := 32;
ERANGE : constant := 34;
EROFS : constant := 30;
ESPIPE : constant := 29;
ESRCH : constant := 3;
ETXTBSY : constant := 26;
EXDEV : constant := 18;
-- _ASM_GENERIC_ERRNO_BASE_H (empty)
end C.asm_generic.errno_base;
-- 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.asm_generic is
pragma Preelaborate;
end C.asm_generic;
-- 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.errno is
function errno return signed_int is
begin
return errno_location.all;
end errno;
end C.bits.errno;
-- 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.errno is
pragma Preelaborate;
function errno_location return signed_int_ptr;
pragma Import (C, errno_location, "__errno_location");
ENOTSUP : constant := 95;
function errno return signed_int;
pragma Inline_Always (errno);
end C.bits.errno;
-- 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 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 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.asm_generic.errno;
with C.asm_generic.errno_base;
with C.bits.errno;
package C.errno is
pragma Preelaborate;
function errno_location return signed_int_ptr
renames bits.errno.errno_location;
ENOTSUP : constant := bits.errno.ENOTSUP;
function errno return signed_int renames bits.errno.errno;
EADDRINUSE : constant := asm_generic.errno.EADDRINUSE;
EADDRNOTAVAIL : constant := asm_generic.errno.EADDRNOTAVAIL;
EADV : constant := asm_generic.errno.EADV;
EAFNOSUPPORT : constant := asm_generic.errno.EAFNOSUPPORT;
EALREADY : constant := asm_generic.errno.EALREADY;
EBADE : constant := asm_generic.errno.EBADE;
EBADFD : constant := asm_generic.errno.EBADFD;
EBADMSG : constant := asm_generic.errno.EBADMSG;
EBADR : constant := asm_generic.errno.EBADR;
EBADRQC : constant := asm_generic.errno.EBADRQC;
EBADSLT : constant := asm_generic.errno.EBADSLT;
EBFONT : constant := asm_generic.errno.EBFONT;
ECANCELED : constant := asm_generic.errno.ECANCELED;
ECHRNG : constant := asm_generic.errno.ECHRNG;
ECOMM : constant := asm_generic.errno.ECOMM;
ECONNABORTED : constant := asm_generic.errno.ECONNABORTED;
ECONNREFUSED : constant := asm_generic.errno.ECONNREFUSED;
ECONNRESET : constant := asm_generic.errno.ECONNRESET;
EDEADLK : constant := asm_generic.errno.EDEADLK;
EDEADLOCK : constant := asm_generic.errno.EDEADLOCK;
EDESTADDRREQ : constant := asm_generic.errno.EDESTADDRREQ;
EDOTDOT : constant := asm_generic.errno.EDOTDOT;
EDQUOT : constant := asm_generic.errno.EDQUOT;
EHOSTDOWN : constant := asm_generic.errno.EHOSTDOWN;
EHOSTUNREACH : constant := asm_generic.errno.EHOSTUNREACH;
EHWPOISON : constant := asm_generic.errno.EHWPOISON;
EIDRM : constant := asm_generic.errno.EIDRM;
EILSEQ : constant := asm_generic.errno.EILSEQ;
EINPROGRESS : constant := asm_generic.errno.EINPROGRESS;
EISCONN : constant := asm_generic.errno.EISCONN;
EISNAM : constant := asm_generic.errno.EISNAM;
EKEYEXPIRED : constant := asm_generic.errno.EKEYEXPIRED;
EKEYREJECTED : constant := asm_generic.errno.EKEYREJECTED;
EKEYREVOKED : constant := asm_generic.errno.EKEYREVOKED;
EL2HLT : constant := asm_generic.errno.EL2HLT;
EL2NSYNC : constant := asm_generic.errno.EL2NSYNC;
EL3HLT : constant := asm_generic.errno.EL3HLT;
EL3RST : constant := asm_generic.errno.EL3RST;
ELIBACC : constant := asm_generic.errno.ELIBACC;
ELIBBAD : constant := asm_generic.errno.ELIBBAD;
ELIBEXEC : constant := asm_generic.errno.ELIBEXEC;
ELIBMAX : constant := asm_generic.errno.ELIBMAX;
ELIBSCN : constant := asm_generic.errno.ELIBSCN;
ELNRNG : constant := asm_generic.errno.ELNRNG;
ELOOP : constant := asm_generic.errno.ELOOP;
EMEDIUMTYPE : constant := asm_generic.errno.EMEDIUMTYPE;
EMSGSIZE : constant := asm_generic.errno.EMSGSIZE;
EMULTIHOP : constant := asm_generic.errno.EMULTIHOP;
ENAMETOOLONG : constant := asm_generic.errno.ENAMETOOLONG;
ENAVAIL : constant := asm_generic.errno.ENAVAIL;
ENETDOWN : constant := asm_generic.errno.ENETDOWN;
ENETRESET : constant := asm_generic.errno.ENETRESET;
ENETUNREACH : constant := asm_generic.errno.ENETUNREACH;
ENOANO : constant := asm_generic.errno.ENOANO;
ENOBUFS : constant := asm_generic.errno.ENOBUFS;
ENOCSI : constant := asm_generic.errno.ENOCSI;
ENODATA : constant := asm_generic.errno.ENODATA;
ENOKEY : constant := asm_generic.errno.ENOKEY;
ENOLCK : constant := asm_generic.errno.ENOLCK;
ENOLINK : constant := asm_generic.errno.ENOLINK;
ENOMEDIUM : constant := asm_generic.errno.ENOMEDIUM;
ENOMSG : constant := asm_generic.errno.ENOMSG;
ENONET : constant := asm_generic.errno.ENONET;
ENOPKG : constant := asm_generic.errno.ENOPKG;
ENOPROTOOPT : constant := asm_generic.errno.ENOPROTOOPT;
ENOSR : constant := asm_generic.errno.ENOSR;
ENOSTR : constant := asm_generic.errno.ENOSTR;
ENOSYS : constant := asm_generic.errno.ENOSYS;
ENOTCONN : constant := asm_generic.errno.ENOTCONN;
ENOTEMPTY : constant := asm_generic.errno.ENOTEMPTY;
ENOTNAM : constant := asm_generic.errno.ENOTNAM;
ENOTRECOVERABLE : constant := asm_generic.errno.ENOTRECOVERABLE;
ENOTSOCK : constant := asm_generic.errno.ENOTSOCK;
ENOTUNIQ : constant := asm_generic.errno.ENOTUNIQ;
EOPNOTSUPP : constant := asm_generic.errno.EOPNOTSUPP;
EOVERFLOW : constant := asm_generic.errno.EOVERFLOW;
EOWNERDEAD : constant := asm_generic.errno.EOWNERDEAD;
EPFNOSUPPORT : constant := asm_generic.errno.EPFNOSUPPORT;
EPROTO : constant := asm_generic.errno.EPROTO;
EPROTONOSUPPORT : constant := asm_generic.errno.EPROTONOSUPPORT;
EPROTOTYPE : constant := asm_generic.errno.EPROTOTYPE;
EREMCHG : constant := asm_generic.errno.EREMCHG;
EREMOTE : constant := asm_generic.errno.EREMOTE;
EREMOTEIO : constant := asm_generic.errno.EREMOTEIO;
ERESTART : constant := asm_generic.errno.ERESTART;
ERFKILL : constant := asm_generic.errno.ERFKILL;
ESHUTDOWN : constant := asm_generic.errno.ESHUTDOWN;
ESOCKTNOSUPPORT : constant := asm_generic.errno.ESOCKTNOSUPPORT;
ESRMNT : constant := asm_generic.errno.ESRMNT;
ESTALE : constant := asm_generic.errno.ESTALE;
ESTRPIPE : constant := asm_generic.errno.ESTRPIPE;
ETIME : constant := asm_generic.errno.ETIME;
ETIMEDOUT : constant := asm_generic.errno.ETIMEDOUT;
ETOOMANYREFS : constant := asm_generic.errno.ETOOMANYREFS;
EUCLEAN : constant := asm_generic.errno.EUCLEAN;
EUNATCH : constant := asm_generic.errno.EUNATCH;
EUSERS : constant := asm_generic.errno.EUSERS;
EWOULDBLOCK : constant := asm_generic.errno.EWOULDBLOCK;
EXFULL : constant := asm_generic.errno.EXFULL;
-- ASM_GENERIC_ERRNO_H renames asm_generic.errno.ASM_GENERIC_ERR... (empty)
E2BIG : constant := asm_generic.errno_base.E2BIG;
EACCES : constant := asm_generic.errno_base.EACCES;
EAGAIN : constant := asm_generic.errno_base.EAGAIN;
EBADF : constant := asm_generic.errno_base.EBADF;
EBUSY : constant := asm_generic.errno_base.EBUSY;
ECHILD : constant := asm_generic.errno_base.ECHILD;
EDOM : constant := asm_generic.errno_base.EDOM;
EEXIST : constant := asm_generic.errno_base.EEXIST;
EFAULT : constant := asm_generic.errno_base.EFAULT;
EFBIG : constant := asm_generic.errno_base.EFBIG;
EINTR : constant := asm_generic.errno_base.EINTR;
EINVAL : constant := asm_generic.errno_base.EINVAL;
EIO : constant := asm_generic.errno_base.EIO;
EISDIR : constant := asm_generic.errno_base.EISDIR;
EMFILE : constant := asm_generic.errno_base.EMFILE;
EMLINK : constant := asm_generic.errno_base.EMLINK;
ENFILE : constant := asm_generic.errno_base.ENFILE;
ENODEV : constant := asm_generic.errno_base.ENODEV;
ENOENT : constant := asm_generic.errno_base.ENOENT;
ENOEXEC : constant := asm_generic.errno_base.ENOEXEC;
ENOMEM : constant := asm_generic.errno_base.ENOMEM;
ENOSPC : constant := asm_generic.errno_base.ENOSPC;
ENOTBLK : constant := asm_generic.errno_base.ENOTBLK;
ENOTDIR : constant := asm_generic.errno_base.ENOTDIR;
ENOTTY : constant := asm_generic.errno_base.ENOTTY;
ENXIO : constant := asm_generic.errno_base.ENXIO;
EPERM : constant := asm_generic.errno_base.EPERM;
EPIPE : constant := asm_generic.errno_base.EPIPE;
ERANGE : constant := asm_generic.errno_base.ERANGE;
EROFS : constant := asm_generic.errno_base.EROFS;
ESPIPE : constant := asm_generic.errno_base.ESPIPE;
ESRCH : constant := asm_generic.errno_base.ESRCH;
ETXTBSY : constant := asm_generic.errno_base.ETXTBSY;
EXDEV : constant := asm_generic.errno_base.EXDEV;
-- ASM_GENERIC_ERRNO_BASE_H renames asm_generic.errno_base.ASM_G... (empty)
ERRNO_H : constant := 1;
end C.errno;
-- 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 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 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 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;
package C.iconv is
pragma Preelaborate;
subtype iconv_t is void_ptr;
function iconv_open (tocode : access constant char;
fromcode : access constant char) return iconv_t;
pragma Import (C, iconv_open, "iconv_open");
function iconv (cd : iconv_t; inbuf : access char_ptr;
inbytesleft : access stddef.size_t; outbuf : access char_ptr;
outbytesleft : access stddef.size_t) return stddef.size_t;
function iconv (cd : iconv_t; inbuf : access char_const_ptr;
inbytesleft : access stddef.size_t; outbuf : access char_ptr;
outbytesleft : access stddef.size_t) return stddef.size_t;
pragma Import (C, iconv, "iconv");
function iconv_close (cd : iconv_t) return signed_int;
pragma Import (C, iconv_close, "iconv_close");
ICONV_H : constant := 1;
end C.iconv;
-- 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;
subtype size_t_ptr is Standard.C.size_t_ptr;
C_NULL : constant void_ptr := void_ptr (System'To_Address (0));
-- _BSD_SIZE_T_ (empty)
-- _BSD_SIZE_T_DEFINED_ (empty)
-- _GCC_SIZE_T (empty)
-- _SIZET_ (empty)
-- _SIZE_T (empty)
-- _SIZE_T_ (empty)
-- _SIZE_T_DECLARED (empty)
-- _SIZE_T_DEFINED (empty)
-- _SIZE_T_DEFINED_ (empty)
-- _SYS_SIZE_T_H (empty)
-- _T_SIZE (empty)
-- _T_SIZE_ (empty)
-- __SIZE_T (empty)
-- __SIZE_T__ (empty)
-- ___int_size_t_h (empty)
-- __size_t (empty)
-- __size_t__ (empty)
end C.stddef;
-- 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 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 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 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 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_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 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 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 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_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_const_ptr_ptr is access all char_const_ptr;
for char_const_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (char_const_ptr_ptr);
pragma Convention (C, char_const_ptr_ptr);
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."=";
type size_t_ptr is access all size_t;
for size_t_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (size_t_ptr);
pragma Convention (C, size_t_ptr);
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