Lines Matching refs:token_type

92     for (my $i = 0, my $token_type, my $token_data; my $token = $tokens->[$i]; $i++) {
95 $token_type = $token->{type};
99 $token_type == USE_DECL ||
100 $token_type == REQUIRE_DECL ||
101 ($token_type == KEY && $constant_creator_subroutines{$token_data})
104 $token_type = $token->{type};
105 if ($token_type == SEMI_COLON) {
112 if ($token_type == NAMESPACE && $token_data eq 'Readonly') {
124 $token_type = $token->{type};
125 if ($token_type == SEMI_COLON) {
136 $token_type = $token->{type};
150 ($token_type == VAR || $token_type == GLOBAL_VAR)
160 $token_type == ASSIGN ||
161 … ($token_type == ARROW && (!$allow_to_the_right_of_a_fat_comma || $is_readonly_array1_ctx))
167 if ($token_type == FUNCTION) {
175 $token_type = $token->{type};
177 if ($token_type == LEFT_BRACE) {
180 elsif ($token_type == RIGHT_BRACE) {
183 elsif ($token_type == SEMI_COLON) {
222 if ($token_type == FOR_STATEMENT || $token_type == FOREACH_STATEMENT) {
224 $token_type = $token->{type};
226 if ($token_type == SEMI_COLON || $token_type == LEFT_BRACE) {
229 elsif ($token_type == SLICE) { # e.g. for my $foo (1..42)
249 if ($token_type == LEFT_BRACKET) {
288 my $token_type = $token->{type};
291 if ($token_type == ASSIGN) {
295 $token_type = $token->{type};
298 elsif ($token_type == ARROW) {
305 $token_type = $token->{type};
312 if ($token_type == DOUBLE) {
315 elsif ($token_type == INT) {
318 elsif ($token_type == LEFT_PAREN) {
321 $token_type = $token->{type};
322 if ($token_type == LEFT_PAREN) {
325 elsif ($token_type == RIGHT_PAREN) {
333 elsif ($token_type == LEFT_BRACKET) {
337 $token_type = $token->{type};
338 if ($token_type == LEFT_BRACKET) {
341 elsif ($token_type == RIGHT_BRACKET) {