From: Richard Kenner Date: Wed, 5 Dec 2001 14:41:47 +0000 (+0000) Subject: vms.h (ADA_LONG_TYPE_SIZE): New macro. X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=1615c261e3b2a6d09a3ae19c52562d9083139ed0;p=gcc.git vms.h (ADA_LONG_TYPE_SIZE): New macro. * config/alpha/vms.h (ADA_LONG_TYPE_SIZE): New macro. * doc/tm.texi (ADA_LONG_TYPE_SIZE): Document it. From-SVN: r47676 --- diff --git a/gcc/ChangeLog b/gcc/ChangeLog index cbd8b3ca919..ef9ab80e18d 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,8 @@ +Wed Dec 5 09:33:39 2001 Richard Kenner + + * config/alpha/vms.h (ADA_LONG_TYPE_SIZE): New macro. + * doc/tm.texi (ADA_LONG_TYPE_SIZE): Document it. + 2001-12-05 Jakub Jelinek * gcse.c (store_killed_in_insn): Consider pure calls diff --git a/gcc/config/alpha/vms.h b/gcc/config/alpha/vms.h index d53deb3102c..61b2fb6d76e 100644 --- a/gcc/config/alpha/vms.h +++ b/gcc/config/alpha/vms.h @@ -80,9 +80,10 @@ Boston, MA 02111-1307, USA. */ #define STRUCT_VALUE 0 #undef PCC_STATIC_STRUCT_RETURN -/* "long" is 32 bits. */ +/* "long" is 32 bits, but 64 bits for Ada. */ #undef LONG_TYPE_SIZE #define LONG_TYPE_SIZE 32 +#define ADA_LONG_TYPE_SIZE 64 /* Pointer is 32 bits but the hardware has 64-bit addresses, sign extended. */ #undef POINTER_SIZE diff --git a/gcc/doc/tm.texi b/gcc/doc/tm.texi index 4c3da22b1b6..7932811a8bd 100644 --- a/gcc/doc/tm.texi +++ b/gcc/doc/tm.texi @@ -1372,6 +1372,14 @@ unit.) A C expression for the size in bits of the type @code{long} on the target machine. If you don't define this, the default is one word. +@findex ADA_LONG_TYPE_SIZE +@item ADA_LONG_TYPE_SIZE +On some machines, the size used for the Ada equivalent of the type +@code{long} by a native Ada compiler differs from that used by C. In +that situation, define this macro to be a C expression to be used for +the size of that type. If you don't define this, the default is the +value of @code{LONG_TYPE_SIZE}. + @findex MAX_LONG_TYPE_SIZE @item MAX_LONG_TYPE_SIZE Maximum number for the size in bits of the type @code{long} on the