URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Only display areas with differences |
Details |
Blame |
View Log
Rev 816 |
Rev 826 |
/* { dg-do compile } */
|
/* { dg-do compile } */
|
/* { dg-options "-std=c99 -pedantic-errors" } */
|
/* { dg-options "-std=c99 -pedantic-errors" } */
|
|
|
/* N1312 7.1.1: The FLOAT_CONST_DECIMAL64 pragma.
|
/* N1312 7.1.1: The FLOAT_CONST_DECIMAL64 pragma.
|
C99 6.4.4.2a (New).
|
C99 6.4.4.2a (New).
|
|
|
Check that there is a pedantic error for the use of pragma
|
Check that there is a pedantic error for the use of pragma
|
STD FLOAT_CONST_DECIMAL64. */
|
STD FLOAT_CONST_DECIMAL64. */
|
|
|
double a;
|
double a;
|
|
|
void f1 (void)
|
void f1 (void)
|
{
|
{
|
#pragma STDC FLOAT_CONST_DECIMAL64 ON /* { dg-error "ISO C" } */
|
#pragma STDC FLOAT_CONST_DECIMAL64 ON /* { dg-error "ISO C" } */
|
a = 1.0;
|
a = 1.0;
|
}
|
}
|
|
|
void f2 (void)
|
void f2 (void)
|
{
|
{
|
#pragma STDC FLOAT_CONST_DECIMAL64 OFF /* { dg-error "ISO C" } */
|
#pragma STDC FLOAT_CONST_DECIMAL64 OFF /* { dg-error "ISO C" } */
|
a = 2.0;
|
a = 2.0;
|
}
|
}
|
|
|
void f3 (void)
|
void f3 (void)
|
{
|
{
|
#pragma STDC FLOAT_CONST_DECIMAL64 DEFAULT /* { dg-error "ISO C" } */
|
#pragma STDC FLOAT_CONST_DECIMAL64 DEFAULT /* { dg-error "ISO C" } */
|
a = 3.0;
|
a = 3.0;
|
}
|
}
|
|
|
void f4 (void)
|
void f4 (void)
|
{
|
{
|
_Pragma ("STDC FLOAT_CONST_DECIMAL64 ON") /* { dg-error "ISO C" } */
|
_Pragma ("STDC FLOAT_CONST_DECIMAL64 ON") /* { dg-error "ISO C" } */
|
a = 1.0;
|
a = 1.0;
|
}
|
}
|
|
|
void f5 (void)
|
void f5 (void)
|
{
|
{
|
_Pragma ("STDC FLOAT_CONST_DECIMAL64 OFF") /* { dg-error "ISO C" } */
|
_Pragma ("STDC FLOAT_CONST_DECIMAL64 OFF") /* { dg-error "ISO C" } */
|
a = 2.0;
|
a = 2.0;
|
}
|
}
|
|
|
void f6 (void)
|
void f6 (void)
|
{
|
{
|
_Pragma ("STDC FLOAT_CONST_DECIMAL64 DEFAULT") /* { dg-error "ISO C" } */
|
_Pragma ("STDC FLOAT_CONST_DECIMAL64 DEFAULT") /* { dg-error "ISO C" } */
|
a = 3.0;
|
a = 3.0;
|
}
|
}
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.