r133083 - in /trunk/gcc: ada/ChangeLog ada/tran...

[ebotcazou@gcc.gnu.org]

Author: ebotcazou
Date: Mon Mar 10 19:26:35 2008
New Revision: 133083

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=133083
Log:
	* 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.


Added:
    trunk/gcc/testsuite/gnat.dg/range_check2.adb
Modified:
    trunk/gcc/ada/ChangeLog
    trunk/gcc/ada/trans.c
    trunk/gcc/testsuite/ChangeLog