mirror of
https://github.com/byteworksinc/ORCA-C.git
synced 2024-12-22 07:30:54 +00:00
41 lines
1008 B
C++
41 lines
1008 B
C++
/* Deviance Test 4.5.3.0.1: Ensure illegal array dimensions are detected */
|
|
|
|
static int x [0]; /* zero not allowed for dimension */
|
|
static float y [0] [5] [9];
|
|
static double k [3] [6] [2] [0];
|
|
|
|
static extended L [-3] [7]; /* negative dimension not allowed */
|
|
static long M [8] [2] []; /* must specify LAST n-1 dimensions */
|
|
|
|
/*****************************************************************************/
|
|
|
|
int F1 (float n [3] [])
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
long L1 (char ch1 [] [])
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
main ()
|
|
{
|
|
char ch0 [0], ch2 [9] [0], ch3 [8] [7] [0] [6];
|
|
extended ext [2] [0] [9] [0];
|
|
int i [3] [] = { 1, 2 }; /* must specify LAST n-1 dimensions */
|
|
int k;
|
|
float n [5] [3];
|
|
|
|
k = F1 (n [5] []);
|
|
k = F1 (n);
|
|
|
|
printf ("Failed Deviance Test 4.5.3.0.1\n");
|
|
}
|