OSDN Git Service

* trans.c (emit_range_check): Do not emit the check if the base type
authorebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 10 Mar 2008 19:26:35 +0000 (19:26 +0000)
committerebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 10 Mar 2008 19:26:35 +0000 (19:26 +0000)
commit29797a976c6c5ebfc0a095d29dc331878e51da37
treedc98e5c42a55d7c4388ee9c0100c8cc34396efaa
parentff949d479ea31a9ef1aaabba55a42a967febf6d7
* trans.c (emit_range_check): Do not emit the check if the base type
of the expression is the type against which its range must be checked.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@133083 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/ada/ChangeLog
gcc/ada/trans.c
gcc/testsuite/ChangeLog
gcc/testsuite/gnat.dg/range_check2.adb [new file with mode: 0644]