Searched refs:perl_flg (Results 1 – 4 of 4) sorted by relevance
116 unsigned short perl_flg=0; variable151 if(arg)perl_flg|=1<<num; in XS()152 else perl_flg&=~(1<<num); in XS()251 perl_flg=0; in perl_setup()
151 DEBUG(('Y',3,"checkflag: perl%d: %d",fln,(perl_flg&(1<<fln))?1:0)); in checkflag()152 return((perl_flg&(1<<fln))?1:0); in checkflag()
156 extern unsigned short perl_flg;
1459 DEBUG(('Y',3,"checkflag: perl%d: %d",fln,(perl_flg&(1<<fln))?1:0)); in checkflag()1460 return((perl_flg&(1<<fln))?1:0); in checkflag()