We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent ffb161a commit 8948f20Copy full SHA for 8948f20
source/compiler/sc3.c
@@ -2215,7 +2215,7 @@ static int nesting=0;
2215
if (arg[argidx].numdim!=1) {
2216
error(48); /* array dimensions must match */
2217
} else {
2218
- if (lval.sym==NULL && (arg[argidx].usage & uCONST)==0)
+ if (lval.sym==NULL && (arg[argidx].usage & uCONST)==0 && (sym->usage & uNATIVE)==0)
2219
error(239);
2220
if (arg[argidx].dim[0]!=0) {
2221
assert(arg[argidx].dim[0]>0);
0 commit comments