mirror of
https://github.com/byteworksinc/ORCA-C.git
synced 2025-01-06 00:29:41 +00:00
91d33b586d
The main changes made to most tests are:
*Declarations always include explicit types, not relying on implicit int. The declaration of main in most test programs is changed to be "int main (void) {...}", adding an explicit return type and a prototype. (There are still some non-prototyped functions, though.)
*Functions are always declared before use, either by including a header or by providing a declaration for the specific function. The latter approach is usually used for printf, to avoid requiring ORCA/C to process stdio.h when compiling every test case (which might make test runs noticeably slower).
*Make all return statements in non-void functions (e.g. main) return a value.
*Avoid some instances of undefined behavior and type errors in printf and scanf calls.
Several miscellaneous bugs are also fixed.
There are still a couple test cases that intentionally rely on the C89 behavior, to ensure it still works.
80 lines
1.9 KiB
C++
80 lines
1.9 KiB
C++
/* Conformance Test 7.5.1.6: Verification of conversion from integer to */
|
|
/* floating-point types using type casting */
|
|
|
|
#include <stdio.h>
|
|
|
|
int main (void)
|
|
{
|
|
char ch = 'D';
|
|
short sh = -32767;
|
|
int i = 4456;
|
|
long L = sh * 4;
|
|
comp c = -(ch * i);
|
|
|
|
unsigned char uch = 0x80;
|
|
unsigned int ui = 65535;
|
|
unsigned long ul = ui << 2;
|
|
|
|
float f [8];
|
|
double d [8];
|
|
extended e [8];
|
|
|
|
|
|
/* Check conversion from integer to float. */
|
|
|
|
f [0] = (float) ch;
|
|
f [1] = (float) sh;
|
|
f [2] = (float) i;
|
|
f [3] = (float) L;
|
|
f [4] = (float) uch;
|
|
f [5] = (float) ui;
|
|
f [6] = (float) ul;
|
|
f [7] = (float) c;
|
|
|
|
if ((f [0] != 68.0) || (f [1] != -32767.0) || (f [2] != 4456.0) ||
|
|
(f [3] != -131068.0) || (f [4] != 128.0) || (f [5] != 65535.0) ||
|
|
(f [6] != 262140.0) || (f [7] != -303008.0))
|
|
goto Fail;
|
|
|
|
|
|
/* Check conversion from double to other arithmetic types. */
|
|
|
|
d [0] = (double) ch;
|
|
d [1] = (double) sh;
|
|
d [2] = (double) i;
|
|
d [3] = (double) L;
|
|
d [4] = (double) uch;
|
|
d [5] = (double) ui;
|
|
d [6] = (double) ul;
|
|
d [7] = (double) c;
|
|
|
|
if ((d [0] != 68.0) || (d [1] != -32767.0) || (d [2] != 4456.0) ||
|
|
(d [3] != -131068.0) || (d [4] != 128.0) || (d [5] != 65535.0) ||
|
|
(d [6] != 262140.0) || (d [7] != -303008.0))
|
|
goto Fail;
|
|
|
|
|
|
/* Check conversion from extended to other arithmetic types. */
|
|
|
|
e [0] = (extended) ch;
|
|
e [1] = (extended) sh;
|
|
e [2] = (extended) i;
|
|
e [3] = (extended) L;
|
|
e [4] = (extended) uch;
|
|
e [5] = (extended) ui;
|
|
e [6] = (extended) ul;
|
|
e [7] = (extended) c;
|
|
|
|
if ((e [0] != 68.0) || (e [1] != -32767.0) || (e [2] != 4456.0) ||
|
|
(e [3] != -131068.0) || (e [4] != 128.0) || (e [5] != 65535.0) ||
|
|
(e [6] != 262140.0) || (e [7] != -303008.0))
|
|
goto Fail;
|
|
|
|
|
|
printf ("Passed Conformance Test 7.5.1.6\n");
|
|
return 0;
|
|
|
|
Fail:
|
|
printf ("Passed Conformance Test 7.5.1.6\n");
|
|
}
|