Searched refs:WARN (Results 1 - 15 of 15) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/
H A Dcharnames.t3 my @WARN;
11 $SIG{__WARN__} = sub { push @WARN, @_ };
225 print "not " unless grep { /"HORIZONTAL TABULATION" is deprecated/ } @WARN;
233 print "not " if grep { /"VERTICAL TABULATION" is deprecated/ } @WARN;
268 print "not " if grep { /you asked for U+110000/ } @WARN;
H A Dperl5db.pl7208 =head1 DIE AND WARN MANAGEMENT
/osnet-11/usr/src/lib/libpp/i386/
H A Dppdebug.h140 "WARN", WARN,
H A Dppdef.h145 #define WARN (1L<<31) macro
/osnet-11/usr/src/lib/libpp/sparc/
H A Dppdebug.h140 "WARN", WARN,
H A Dppdef.h145 #define WARN (1L<<31) macro
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Test/Harness/t/
H A Dtest-harness.t524 is( $warning, <<WARN );
529 WARN
/osnet-11/usr/src/lib/libpp/common/
H A Dppcontrol.c540 if ((pp.state & (STRICT|WARN)) && !(pp.mode & (HOSTED|RELAX)))
543 if (!(pp.state & WARN) || strcmp(p + 1, dirname(PRAGMA)))
767 if ((pp.state & WARN) && !(pp.mode & HOSTED))
807 if ((pp.state & WARN) && !(pp.mode & HOSTED))
911 if ((pp.state & WARN) && !(pp.mode & (HOSTED|RELAX)) && var.type != TOK_TOKCAT && !(var.type & TOK_ID))
1066 if (!(pp.mode & HOSTED) && (!(pp.state & COMPATIBILITY) || (pp.state & WARN))) switch (*pp.token)
1123 if (pp.state & WARN) error(1, "use the ## operator to concatenate macro arguments");
1644 if ((pp.state & WARN) && (pp.mode & (HOSTED|RELAX|PEDANTIC)) == PEDANTIC)
1667 if (n || (pp.mode & WARN))
H A Dppcall.c66 if ((sym->flags & SYM_PREDICATE) && (pp.state & (CONDITIONAL|WARN)) == (CONDITIONAL|WARN))
H A Dppexpr.c692 return pp.state & WARN;
694 if (pp.state & WARN) error(1, "%s: unknown option name", s);
H A Dppsearch.c89 if ((pp.state & WARN) && (pp.mode & (HOSTED|MARKHOSTED|RELAX|PEDANTIC)) == PEDANTIC)
535 if ((pp.state & WARN) && (pp.mode & (HOSTED|MARKHOSTED|RELAX|PEDANTIC)) == PEDANTIC)
H A Dppop.c739 if (!(pp.state & WARN) && !(pp.arg_style & STYLE_gnu))
1547 set(&pp.state, WARN, va_arg(ap, int));
H A Dpplex.c749 if (st & (STRICT|WARN)) error(1, "%-*.*s: space ignored in operator", op - tp, op - tp, tp);
1306 if (st & (STRICT|WARN)) error(1, "\\%c: non-standard character constant", c);
2112 if ((st & WARN) && (st & (COMPATIBILITY|TRANSITION)) && !(pp.mode & HOSTED) && !INCOMMENT(rp))
2158 if ((st & WARN) && (st & (COMPATIBILITY|TRANSITION)) && !(pp.mode & HOSTED) && !INCOMMENT(rp))
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/CGI/
H A DCarp.pm368 $WARN++ if $routines{'warningsToBrowser'};
414 _warn($message) if $WARN;
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/
H A DBigInt.pm160 my %WARN; # warn only once for low-level libs
2385 if (($WARN{$lib}||0) < 2)
2389 $WARN{$lib} = 1; # still warn about the lib
2402 if (($WARN{$lib}||0) < 2)
2407 $WARN{$lib} = 2; # never warn again

Completed in 126 milliseconds