Cross Reference: /osnet-11/usr/src/cmd/perl/5.8.4/distrib/toke.c

Lines Matching refs:WARN_SYNTAX
253     if (ckWARN_d(WARN_SYNTAX)) {
255 	    Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
261 		Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
267 	    Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
337     if (ckWARN2(WARN_DEPRECATED, WARN_SYNTAX))
338 	Perl_warner(aTHX_ packWARN2(WARN_DEPRECATED, WARN_SYNTAX), 
1390 		if (ckWARN(WARN_SYNTAX))
1391 		    Perl_warner(aTHX_ packWARN(WARN_SYNTAX), "\\%c better written as $%c", *s, *s);
3374 	if (ckWARN(WARN_SYNTAX) && tmp && isSPACE(*s) && strchr("+-*/%.^&|<",tmp))
3375 	    Perl_warner(aTHX_ packWARN(WARN_SYNTAX), "Reversed %c= operator",(int)tmp);
3511 		if (ckWARN(WARN_SYNTAX)) {
3519 			Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
3527 		if (ckWARN(WARN_SYNTAX) && strEQ(PL_tokenbuf+1, "SIG") &&
3537 			    Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
3604 	    if (ckWARN(WARN_SYNTAX)) {
3612 			Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
3738 	if (ckWARN(WARN_SYNTAX) && PL_lex_inwhat && isDIGIT(*s))
3739 	    Perl_warner(aTHX_ packWARN(WARN_SYNTAX),"Can't use \\%c to mean $%c in expression",
5072 		    if (bad_proto && ckWARN(WARN_SYNTAX))
5073 			Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
5523 	    if (strEQ(d,"elseif") && ckWARN_d(WARN_SYNTAX))
5524 		Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
6010 	if (ckWARN(WARN_SYNTAX)) {
6021 		Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
7283 	       if (ckWARN(WARN_SYNTAX))
7284 		   Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
7307 		    if (ckWARN(WARN_SYNTAX) && lastub && s == lastub + 1)
7308 		        Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
7380 	        if (ckWARN(WARN_SYNTAX))
7381 		    Perl_warner(aTHX_ packWARN(WARN_SYNTAX), "Misplaced _ in number");
7423 		if (ckWARN(WARN_SYNTAX) && lastub && s == lastub + 1)
7424 		    Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
7439 	    if (ckWARN(WARN_SYNTAX))
7440 		Perl_warner(aTHX_ packWARN(WARN_SYNTAX), "Misplaced _ in number");
7452 	        if (ckWARN(WARN_SYNTAX))
7453 		    Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
7465 		   if (ckWARN(WARN_SYNTAX) && lastub && s == lastub + 1)
7466 		       Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
7475 	        if (ckWARN(WARN_SYNTAX))
7476 		    Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
7496 	        if (ckWARN(WARN_SYNTAX))
7497 		    Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
7508 	        if (ckWARN(WARN_SYNTAX))
7509 		    Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
7522 		   if (ckWARN(WARN_SYNTAX) &&
7525 		       Perl_warner(aTHX_ packWARN(WARN_SYNTAX),
7820     if (PL_in_eval & EVAL_WARNONLY && ckWARN_d(WARN_SYNTAX))
7821 	Perl_warner(aTHX_ packWARN(WARN_SYNTAX), "%"SVf, msg);