Lines Matching defs:expecting
417 expecting: 'perltidyrc' or 'full'
3695 expecting ref to SCALAR but got ref to ($ref); trace follows:
3724 expecting mode = 'r' or 'w' but got mode ($mode); trace follows:
3779 expecting ref to ARRAY but got ref to ($ref); trace follows:
3795 expecting mode = 'r' or 'w' but got mode ($mode); trace follows:
7760 Unrecognized line ending '$ole'; expecting one of: $str
23559 $block_type, $container_type, $expecting,
23661 $block_type, $container_type, $expecting,
23712 $block_type, $container_type, $expecting,
23875 $max_token_index, $expecting );
23894 if ( $expecting == TERM ) {
23905 if ( $expecting == OPERATOR ) {
23979 if ( $expecting == TERM );
23983 if ( $expecting == TERM );
23989 if ( $expecting == OPERATOR );
24024 $expecting == OPERATOR
24073 } ## end if ( $expecting == OPERATOR...
24182 if ( $expecting == OPERATOR );
24189 if ( $expecting == OPERATOR );
24196 if ( $expecting == OPERATOR );
24204 if ( $expecting == UNKNOWN ) { # indeterminte, must guess..
24215 else { $is_pattern = ( $expecting == TERM ) }
24388 # are expecting an operator. This example from s2p
24391 if ( $expecting != OPERATOR ) {
24393 # But only look for a sub call if we are expecting a term or
24397 if ( $expecting == TERM || $next_type ne 'b' ) {
24406 if ( $expecting != OPERATOR ) {
24409 $expecting, $max_token_index );
24411 if ( $type eq '<' && $expecting == TERM ) {
24425 if ( $expecting == UNKNOWN ) {
24434 else { $is_pattern = ( $expecting == TERM ) }
24449 if ( $expecting == TERM ) {
24473 if ( $expecting != OPERATOR ) {
24477 if ( $expecting == TERM );
24519 if ( $expecting == TERM ) {
24525 elsif ( $expecting == OPERATOR ) {
24534 if ( $expecting == OPERATOR );
24540 if ( $expecting == UNKNOWN ) {
24541 if ( $next_type ne 'b' ) { $expecting = TERM }
24543 if ( $expecting == TERM ) {
24580 if ( ( $expecting != OPERATOR )
24598 elsif ( $expecting == TERM ) {
24605 elsif ( $expecting == OPERATOR ) {
24618 if ( $expecting == TERM ) {
24654 if ( $expecting != OPERATOR ) {
24661 = find_here_doc( $expecting, $i, $rtokens, $rtoken_map,
24678 elsif ( $expecting == TERM ) {
24699 if ( $expecting == TERM ) { $type = 'pp' }
24700 elsif ( $expecting == UNKNOWN ) {
24720 if ( $expecting == TERM ) { $type = 'mm' }
24721 elsif ( $expecting == UNKNOWN ) {
24730 if ( $expecting == TERM );
24735 if ( $expecting == TERM );
24740 if ( $expecting == TERM );
25246 my $expecting =
25248 $combine_ok = 0 unless ( $expecting == OPERATOR );
25301 $expecting = operator_expected( $prev_type, $tok, $next_type );
25373 if ( ( $tok =~ /^x\d*$/ ) && ( $expecting == OPERATOR ) ) {
25484 if ( $expecting == OPERATOR ) {
25532 if ( $expecting == OPERATOR );
25538 # start rescanning we will be expecting a token of type TERM.
25562 if ( $expecting == OPERATOR );
25579 "expecting '$tok' to follow one of 'if|elsif|unless'\n"
25591 "expecting '$tok' to follow one of 'if|elsif|unless|case|when'\n"
25657 if ( $expecting == OPERATOR ) {
25727 $expecting = operator_expected( $prev_type, $tok, $next_type );
25729 if ( $expecting == OPERATOR );
25747 $expecting =
26436 # the tokenizer, which may either be expecting a term or an
26449 # $last_nonblank_type is '=~', then we are expecting a TERM, whereas
26450 # if $last_nonblank_type is 'n' (numeric), we are expecting an
26512 # expecting an operator:
26570 # expecting VERSION or {} after package NAMESPACE
26914 my ( $found, $expecting, $i_tok, $last_nonblank_i, $rpretoken_map,
26919 my $msg = "found $found where $expecting expected";
27851 # now expecting VERSION, BLOCK, or ; to follow ...
27886 $expecting )
28185 if ( $identifier eq '&' && $expecting ) {
28548 "expecting ':' or ';' or '{' after definition or declaration of sub '$subname' but saw '$next_nonblank_token'\n"
28671 my ( $input_line, $i_beg, $rtoken_map, $expecting, $max_token_index ) = @_;
28679 if ( $expecting == TERM ) { $filter = '[\>]' }
28682 elsif ( $expecting == UNKNOWN ) { $filter = '[\>\;\=\#\|\<]' }
28727 if ( $expecting eq UNKNOWN ) {
28753 if ( $expecting == TERM ) {
28790 "ANGLE-Guessing yes: $str expecting=$expecting\n");
28798 if ( $expecting == TERM ) {
28937 my ( $expecting, $i, $rtokens, $rtoken_map, $max_token_index ) = @_;
28972 if ( $expecting == TERM ) {
28998 elsif ( ( $next_token =~ /^\s*$/ ) and ( $expecting == TERM ) ) {
29007 if ( $expecting == UNKNOWN ) {
29023 if ( $expecting == TERM ) {