On Mar 13, 2012, at 12:13 PM, Andreas Schwab wrote:

> Tristan Gingold <ging...@adacore.com> writes:
> 
>> diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c
>> index 34183ba..120628e 100644
>> --- a/gcc/ada/gcc-interface/decl.c
>> +++ b/gcc/ada/gcc-interface/decl.c
>> @@ -5488,7 +5488,7 @@ gnat_to_gnu_param (Entity_Id gnat_param, 
>> Mechanism_Type mech,
>> 
>>   /* VMS descriptors are themselves passed by reference.  */
>>   if (mech == By_Short_Descriptor ||
>> -      (mech == By_Descriptor && TARGET_ABI_OPEN_VMS && !TARGET_MALLOC64))
>> +      (mech == By_Descriptor && TARGET_ABI_OPEN_VMS && !flag_vms_malloc64))
> 
> ../../gcc/ada/gcc-interface/decl.c: In function 'gnat_to_gnu_param':
> ../../gcc/ada/gcc-interface/decl.c:5492: error: 'flag_vms_malloc64' 
> undeclared (first use in this function)
> ../../gcc/ada/gcc-interface/decl.c:5492: error: (Each undeclared identifier 
> is reported only once
> ../../gcc/ada/gcc-interface/decl.c:5492: error: for each function it appears 
> in.)
> make[3]: *** [ada/decl.o] Error 1

For which target ?

On non-VMS targets, flag_vms_malloc64 is declared in gigi.h as:

/* Let code know whether we are targetting VMS without need of
   intrusive preprocessor directives.  */
#ifndef TARGET_ABI_OPEN_VMS
#define TARGET_ABI_OPEN_VMS 0

/* VMS option set by default, when clear forces 32bit mallocs and 32bit
   Descriptors. Always used in combination with TARGET_ABI_OPEN_VMS
   so no effect on non-VMS systems.  */
#define flag_vms_malloc64 0
#endif

Tristan.

Reply via email to