mirror of https://github.com/tbklang/tlang.git
17 lines
246 B
Perl
17 lines
246 B
Perl
|
module complex_stack_array_coerce_bad1;
|
||
|
|
||
|
int val1;
|
||
|
int val2;
|
||
|
|
||
|
void coerce_bad1(int* in) {}
|
||
|
|
||
|
int function()
|
||
|
{
|
||
|
int[][2] stackArr;
|
||
|
stackArr[0] = &val1;
|
||
|
stackArr[1] = &val2;
|
||
|
|
||
|
discard coerce_bad1(stackArr);
|
||
|
|
||
|
return val1+val2;
|
||
|
}
|