Searched defs:allow_package (Results 1 - 1 of 1) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dtoke.c6151 S_scan_word(pTHX_ register char *s, char *dest, STRLEN destlen, int allow_package, STRLEN *slp) argument
6160 else if (*s == '\'' && allow_package && isIDFIRST_lazy_if(s+1,UTF)) {
6165 else if (*s == ':' && s[1] == ':' && allow_package && s[2] != '$') {

Completed in 40 milliseconds