diff --git a/source/compiler/sc1.c b/source/compiler/sc1.c index 7a7f53d..6c7529f 100644 --- a/source/compiler/sc1.c +++ b/source/compiler/sc1.c @@ -5923,6 +5923,10 @@ static void emit_param_data(ucell *p,int size) error(17,str); /* undefined symbol */ break; } + if (sym->ident==iFUNCTN || sym->ident==iREFFUNC) { + emit_invalid_token(teDATA,((sym->usage & uNATIVE)!=0) ? teNATIVE : teFUNCTN); + break; + } } markusage(sym,uREAD|uWRITTEN); p[curp]=sym->addr;