Sign in
gnu
/
gcc
/
b2d961e7342b5ba4e57adfa81cb189b738d10901
/
.
/
gcc
/
testsuite
/
gnat.dg
/
specs
/
integer_value.ads
blob: 6e9c1b51f3201cbf5867a2c52d87c1bc1c3b487e [
file
] [
log
] [
blame
]
--
{
dg
-
do
compile
}
package
Integer_Value
is
X
:
constant
Integer
:=
Integer
'Integer_Value (12.8); -- { dg-error "fixed-point type" "" }
end Integer_Value;