mirror of
https://github.com/byteworksinc/ORCA-C.git
synced 2024-05-28 12:41:35 +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.
64 lines
1.2 KiB
C++
64 lines
1.2 KiB
C++
/* Conformance Test 7.9.2.4: Verification of additive assign operators */
|
|
|
|
#include <stdio.h>
|
|
#include <math.h>
|
|
|
|
int main (void)
|
|
{
|
|
int i = 5;
|
|
long L = 32777;
|
|
char ch = '!';
|
|
|
|
unsigned int ui = 653;
|
|
unsigned long ul = 895;
|
|
unsigned char uch = 0x8;
|
|
|
|
comp c = 4294;
|
|
float f = 3.5;
|
|
double d = 87.65;
|
|
extended e = 92.33;
|
|
|
|
|
|
i += -8;
|
|
L += 3;
|
|
ch += 2;
|
|
c += -9;
|
|
f += 1.1;
|
|
d += 5;
|
|
e += 8;
|
|
ui += 3;
|
|
ul += 7;
|
|
uch += 2;
|
|
|
|
if ((i != -3) || (L != 32780) || (ch != '#') || (ui != 656) ||
|
|
(ul != 902) || (uch != 10) || (c != 4285) ||
|
|
(fabs(f - 4.6) > 0.00001) || (fabs(d - 92.65) > 0.00001) ||
|
|
(fabs(e - 100.33) > 0.00001))
|
|
goto Fail;
|
|
|
|
|
|
i -= (-2000);
|
|
L -= 33;
|
|
ch -= -90;
|
|
c -= 0;
|
|
f -= 6.8;
|
|
d -= 72.1;
|
|
e -= 3.2;
|
|
ui -= 8;
|
|
ul -= 900;
|
|
uch -= uch;
|
|
|
|
if ((i != 1997) || (L != 32747) || (ch != 125) || (ui != 648) ||
|
|
(ul != 2) || (uch != 0) || (c != 4285) ||
|
|
(fabs(f - (-2.2)) > 0.00001) || (fabs(d - 20.55) > 0.00001) ||
|
|
(fabs(e - 97.13) > 0.00001))
|
|
goto Fail;
|
|
|
|
|
|
printf ("Passed Conformance Test 7.9.2.4\n");
|
|
return 0;
|
|
|
|
Fail:
|
|
printf ("Failed Conformance Test 7.9.2.4\n");
|
|
}
|