mirror of
git://gcc.gnu.org/git/gcc.git
synced 2025-03-28 16:01:00 +08:00
* gnat.dg/boolean_expr.ad[sb]: Rename to boolean_expr1.ad[sb].
From-SVN: r138520
This commit is contained in:
parent
ec6fa56a8d
commit
769b26a6bd
@ -1,3 +1,7 @@
|
||||
2008-08-01 Eric Botcazou <ebotcazou@adacore.com>
|
||||
|
||||
* gnat.dg/boolean_expr.ad[sb]: Rename to boolean_expr1.ad[sb].
|
||||
|
||||
2008-08-01 Richard Guenther <rguenther@suse.de>
|
||||
|
||||
PR middle-end/36997
|
||||
|
@ -4,7 +4,7 @@
|
||||
-- { dg-do compile }
|
||||
-- { dg-options "-O2" }
|
||||
|
||||
package body Boolean_Expr is
|
||||
package body Boolean_Expr1 is
|
||||
|
||||
function Long_Float_Is_Valid (X : in Long_Float) return Boolean is
|
||||
Is_Nan : constant Boolean := X /= X;
|
||||
@ -27,4 +27,4 @@ package body Boolean_Expr is
|
||||
return "ERROR";
|
||||
end S;
|
||||
|
||||
end Boolean_Expr;
|
||||
end Boolean_Expr1;
|
@ -1,5 +1,5 @@
|
||||
package Boolean_Expr is
|
||||
package Boolean_Expr1 is
|
||||
|
||||
function S (V : in Long_Float) return String;
|
||||
|
||||
end Boolean_Expr;
|
||||
end Boolean_Expr1;
|
Loading…
x
Reference in New Issue
Block a user