/* Conformance Test 7.4.1.1: Verification of subscripted expressions */ #include #include main () { int i [5] = { 1, 2, 3, 4, 5 }, *iptr = i; struct S { float f; char ch; } s = { 2.2, 'k' }, *sptr = &s; static double D (extended e), (*fptr) () = D, d; if ((iptr++ [2]) != 3) goto Fail; if (iptr != &i [1]) goto Fail; if (i [4] != 5) goto Fail; d = (*fptr) (5.5); if (fabs(d - 11.0) > 0.00001) goto Fail; d = fptr (4.5); if (fabs(d - 9.0) > 0.00001) goto Fail; printf ("Passed Conformance Test 7.4.1.1\n"); return; Fail: printf ("Failed Conformance Test 7.4.1.1\n"); } /*****************************************************************************/ static double D (extended e) { return (e * 2.0); }