On Apr 4, 2012, at 10:18 AM, Richard Guenther wrote:

> On Wed, 4 Apr 2012, Tristan Gingold wrote:
> 
>> Hi,
>> 
>> this patch fixes a build time failure on VMS (while compiling Ada RTS file 
>> i-cstrin.adb) due to the use of short pointers:
>> 
>> i-cstrin.adb: In function 'Interfaces.C.Strings.To_Chars_Ptr':
>> i-cstrin.adb:236:8: error: unrecognizable insn:
>> (insn 80 79 81 13 (set (reg:SI 384)
>>        (const_int 4294967288 [0xfffffff8])) i-cstrin.adb:234 -1
>>     (nil))
>> +===========================GNAT BUG DETECTED==============================+
>> | Pro 7.1.0w (20120403-47) (ia64-hp-openvms) GCC error:                    |
>> | in extract_insn, at recog.c:2123                                         |
>> | Error detected around i-cstrin.adb:236:8                                 |
>> 
>> 
>> Expansion of POINTER_PLUS_EXPR doesn't handle the case of 
>> PRECISION(sizetype) > PRECISION(type), leading to RTL expressions with 
>> different modes.
>> 
>> This patch fixes the build issue, tested on ia64-hp-openvms.
>> Also tested with our internal testsuite.
>> I haven't run the GCC testsuite on a regular platform, as the condition will 
>> never trigger.
>> 
>> Ok for trunk ?
> 
> Ok if you add a comment why this is needed.
Thanks, committed with this comment:

      /* If sizetype precision is larger than pointer precision, truncate the
         offset to have matching modes.  */
      else if (TYPE_PRECISION (sizetype) > TYPE_PRECISION (type))
        treeop1 = fold_convert_loc (loc, type, treeop1);


Tristan.

Reply via email to