Home
last modified time | relevance | path

Searched refs:PL_parser (Results 1 – 25 of 379) sorted by relevance

12345678910>>...16

/dports/devel/p5-Devel-Declare/Devel-Declare-0.006022/
H A Dstolen_chunk_of_toke.c142 #define PL_lex_op (PL_parser->lex_op)
152 #define PL_linestr (PL_parser->linestr)
154 #define PL_linestr (PL_parser->linestr)
155 #define PL_expect (PL_parser->expect)
157 #define PL_bufptr (PL_parser->bufptr)
161 #define PL_bufend (PL_parser->bufend)
166 #define PL_rsfp (PL_parser->rsfp)
168 #define PL_in_my (PL_parser->in_my)
173 #define PL_nexttoke (PL_parser->nexttoke)
177 # define PL_curforce (PL_parser->curforce)
[all …]
/dports/lang/perl5.30/perl-5.30.3/
H A Dtoke.c1250 if (PL_parser->last_uni && PL_parser->last_uni < ptr) in Perl_lex_discard_to()
1252 if (PL_parser->last_lop && PL_parser->last_lop < ptr) in Perl_lex_discard_to()
1327 && PL_parser->bufptr == PL_parser->bufend) in Perl_lex_next_chunk()
1331 if (PL_parser->last_uni != PL_parser->bufend) in Perl_lex_next_chunk()
1333 if (PL_parser->last_lop != PL_parser->bufend) in Perl_lex_next_chunk()
1349 } else if (!PL_parser->rsfp && !PL_parser->filtered) { in Perl_lex_next_chunk()
1368 PL_parser->in_pod = PL_parser->filtered = 0; in Perl_lex_next_chunk()
1524 PL_parser->bufptr += UTF8SKIP(PL_parser->bufptr); in Perl_lex_read_unichar()
4505 PL_parser->last_uni ? PL_parser->last_uni - buf : 0; in Perl_filter_add()
4507 PL_parser->last_lop ? PL_parser->last_lop - buf : 0; in Perl_filter_add()
[all …]
H A Dop.c1759 if (PL_parser && PL_parser->error_count) in S_scalar_slice_warning()
1902 if (PL_parser && PL_parser->error_count) in Perl_scalar()
2326 || (PL_parser && PL_parser->error_count) in Perl_list()
4548 if (PL_parser && PL_parser->error_count) in Perl_doref()
5245 if (PL_parser && PL_parser->parsed_sub) { in Perl_block_end()
5448 if ( PL_parser->bufptr > PL_parser->oldbufptr in Perl_localize()
5638 if (PL_parser && PL_parser->error_count) in S_fold_constants()
5767 if (PL_parser && PL_parser->error_count) in S_gen_constant_list()
9561 if (PL_parser && PL_parser->error_count) { in Perl_newMYSUB()
11551 && !(PL_parser && PL_parser->error_count)) in Perl_ck_exists()
[all …]
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/
H A Dtoke.c1080 last_uni_pos = PL_parser->last_uni ? PL_parser->last_uni - buf : 0; in Perl_lex_grow_linestr()
1081 last_lop_pos = PL_parser->last_lop ? PL_parser->last_lop - buf : 0; in Perl_lex_grow_linestr()
1361 if (PL_parser->last_uni && PL_parser->last_uni < ptr) in Perl_lex_discard_to()
1363 if (PL_parser->last_lop && PL_parser->last_lop < ptr) in Perl_lex_discard_to()
1390 if (PL_parser) { in Perl_notify_parser_that_changed_to_utf8()
1440 && PL_parser->bufptr == PL_parser->bufend) in Perl_lex_next_chunk()
1444 if (PL_parser->last_uni != PL_parser->bufend) in Perl_lex_next_chunk()
1446 if (PL_parser->last_lop != PL_parser->bufend) in Perl_lex_next_chunk()
1462 } else if (!PL_parser->rsfp && !PL_parser->filtered) { in Perl_lex_next_chunk()
1481 PL_parser->in_pod = PL_parser->filtered = 0; in Perl_lex_next_chunk()
[all …]
/dports/lang/perl5.32/perl-5.32.1/
H A Dtoke.c1262 if (PL_parser->last_uni && PL_parser->last_uni < ptr) in Perl_lex_discard_to()
1264 if (PL_parser->last_lop && PL_parser->last_lop < ptr) in Perl_lex_discard_to()
1341 && PL_parser->bufptr == PL_parser->bufend) in Perl_lex_next_chunk()
1345 if (PL_parser->last_uni != PL_parser->bufend) in Perl_lex_next_chunk()
1347 if (PL_parser->last_lop != PL_parser->bufend) in Perl_lex_next_chunk()
1363 } else if (!PL_parser->rsfp && !PL_parser->filtered) { in Perl_lex_next_chunk()
1382 PL_parser->in_pod = PL_parser->filtered = 0; in Perl_lex_next_chunk()
1538 PL_parser->bufptr += UTF8SKIP(PL_parser->bufptr); in Perl_lex_read_unichar()
4601 PL_parser->last_uni ? PL_parser->last_uni - buf : 0; in Perl_filter_add()
4603 PL_parser->last_lop ? PL_parser->last_lop - buf : 0; in Perl_filter_add()
[all …]
H A Dop.c1833 if (PL_parser && PL_parser->error_count) in S_scalar_slice_warning()
4883 if (PL_parser && PL_parser->error_count) in Perl_doref()
5725 if (PL_parser && PL_parser->parsed_sub) { in Perl_block_end()
5928 if ( PL_parser->bufptr > PL_parser->oldbufptr in Perl_localize()
6119 if (PL_parser && PL_parser->error_count) in S_fold_constants()
6252 if (PL_parser && PL_parser->error_count) in S_gen_constant_list()
10763 if (PL_parser && PL_parser->copline != NOLINE) in S_already_defined()
10839 if (PL_parser && PL_parser->error_count) { in Perl_newMYSUB()
12179 if (PL_parser && PL_parser->error_count) { in Perl_newFORM()
12831 && !(PL_parser && PL_parser->error_count)) in Perl_ck_exists()
[all …]
/dports/lang/perl5.34/perl-5.34.0/
H A Dtoke.c1287 if (PL_parser->last_uni && PL_parser->last_uni < ptr) in Perl_lex_discard_to()
1289 if (PL_parser->last_lop && PL_parser->last_lop < ptr) in Perl_lex_discard_to()
1366 && PL_parser->bufptr == PL_parser->bufend) in Perl_lex_next_chunk()
1370 if (PL_parser->last_uni != PL_parser->bufend) in Perl_lex_next_chunk()
1372 if (PL_parser->last_lop != PL_parser->bufend) in Perl_lex_next_chunk()
1388 } else if (!PL_parser->rsfp && !PL_parser->filtered) { in Perl_lex_next_chunk()
1407 PL_parser->in_pod = PL_parser->filtered = 0; in Perl_lex_next_chunk()
1562 PL_parser->bufptr += UTF8SKIP(PL_parser->bufptr); in Perl_lex_read_unichar()
4648 PL_parser->last_uni ? PL_parser->last_uni - buf : 0; in Perl_filter_add()
4650 PL_parser->last_lop ? PL_parser->last_lop - buf : 0; in Perl_filter_add()
[all …]
H A Dop.c1844 if (PL_parser && PL_parser->error_count) in S_scalar_slice_warning()
4889 if (PL_parser && PL_parser->error_count) in Perl_doref()
5727 if (PL_parser && PL_parser->parsed_sub) { in Perl_block_end()
5930 if ( PL_parser->bufptr > PL_parser->oldbufptr in Perl_localize()
6127 if (PL_parser && PL_parser->error_count) in S_fold_constants()
6259 if (PL_parser && PL_parser->error_count) in S_gen_constant_list()
10818 if (PL_parser && PL_parser->copline != NOLINE) in S_already_defined()
10894 if (PL_parser && PL_parser->error_count) { in Perl_newMYSUB()
12241 if (PL_parser && PL_parser->error_count) { in Perl_newFORM()
12948 && !(PL_parser && PL_parser->error_count)) in Perl_ck_exists()
[all …]
/dports/devel/p5-Keyword-Simple/Keyword-Simple-0.04/
H A DSimple.xs103 #define PL_rsfp_filters (PL_parser->rsfp_filters)
108 #define PL_parser_filtered (PL_parser->filtered)
124 if (PL_parser && PL_parser->error_count) { in kw_handler()
201 sv_setpvn(sv, PL_parser->bufptr, PL_parser->bufend - PL_parser->bufptr); in total_recall()
202 lex_unstuff(PL_parser->bufend); /* you saw nothing */ in total_recall()
204 if (PL_parser->rsfp || PL_parser_filtered) { in total_recall()
230 if (PL_parser->rsfp || PL_parser_filtered) { in total_recall()
/dports/lang/perl5.34/perl-5.34.0/dist/Devel-PPPort/parts/inc/
H A Dvariables45 PL_parser
144 /* Warning: PL_parser
149 * If you always check that PL_parser is non-NULL, you can
156 # define D_PPP_my_PL_parser_var(var) ((PL_parser ? PL_parser : \
157 (croak("panic: PL_parser == NULL in %s:%d", \
166 # define D_PPP_my_PL_parser_var(var) ((PL_parser ? PL_parser : \
168 __NEED_DUMMY_VAR__ yy_parser PL_parser;
177 * An always non-NULL PL_parser dummy is provided for earlier
204 # define PL_parser ((void *) 1)
344 PL_parser()
[all …]
/dports/lang/perl5.30/perl-5.30.3/dist/Devel-PPPort/parts/inc/
H A Dvariables44 PL_parser
140 /* Warning: PL_parser
145 * If you always check that PL_parser is non-NULL, you can
152 # define D_PPP_my_PL_parser_var(var) ((PL_parser ? PL_parser : \
153 (croak("panic: PL_parser == NULL in %s:%d", \
162 # define D_PPP_my_PL_parser_var(var) ((PL_parser ? PL_parser : \
164 __NEED_DUMMY_VAR__ yy_parser PL_parser;
200 # define PL_parser ((void *) 1)
340 PL_parser()
342 RETVAL = newSViv(PL_parser != NULL);
[all …]
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/dist/Devel-PPPort/parts/inc/
H A Dvariables45 PL_parser
144 /* Warning: PL_parser
149 * If you always check that PL_parser is non-NULL, you can
156 # define D_PPP_my_PL_parser_var(var) ((PL_parser ? PL_parser : \
157 (croak("panic: PL_parser == NULL in %s:%d", \
166 # define D_PPP_my_PL_parser_var(var) ((PL_parser ? PL_parser : \
168 __NEED_DUMMY_VAR__ yy_parser PL_parser;
177 * An always non-NULL PL_parser dummy is provided for earlier
204 # define PL_parser ((void *) 1)
344 PL_parser()
[all …]
/dports/lang/perl5.32/perl-5.32.1/dist/Devel-PPPort/parts/inc/
H A Dvariables45 PL_parser
144 /* Warning: PL_parser
149 * If you always check that PL_parser is non-NULL, you can
156 # define D_PPP_my_PL_parser_var(var) ((PL_parser ? PL_parser : \
157 (croak("panic: PL_parser == NULL in %s:%d", \
166 # define D_PPP_my_PL_parser_var(var) ((PL_parser ? PL_parser : \
168 __NEED_DUMMY_VAR__ yy_parser PL_parser;
204 # define PL_parser ((void *) 1)
344 PL_parser()
346 RETVAL = newSViv(PL_parser != NULL);
[all …]
/dports/devel/p5-Devel-PPPort/Devel-PPPort-3.63/parts/inc/
H A Dvariables45 PL_parser
144 /* Warning: PL_parser
149 * If you always check that PL_parser is non-NULL, you can
156 # define D_PPP_my_PL_parser_var(var) ((PL_parser ? PL_parser : \
157 (croak("panic: PL_parser == NULL in %s:%d", \
166 # define D_PPP_my_PL_parser_var(var) ((PL_parser ? PL_parser : \
168 __NEED_DUMMY_VAR__ yy_parser PL_parser;
177 * An always non-NULL PL_parser dummy is provided for earlier
204 # define PL_parser ((void *) 1)
344 PL_parser()
[all …]
/dports/devel/p5-B-Hooks-Parser/B-Hooks-Parser-0.21/
H A Dstolen_chunk_of_toke.c96 #define PL_lex_inwhat (PL_parser->lex_inwhat)
99 #define PL_oldbufptr (PL_parser->oldbufptr)
100 #define PL_linestart (PL_parser->linestart)
101 #define PL_last_lop (PL_parser->last_lop)
102 #define PL_last_uni (PL_parser->last_uni)
104 #define PL_multi_open (PL_parser->multi_open)
106 #define PL_multi_end (PL_parser->multi_end)
107 #define PL_lex_repl (PL_parser->lex_repl)
108 #define PL_nexttype (PL_parser->nexttype)
109 #define PL_nexttoke (PL_parser->nexttoke)
[all …]
/dports/devel/p5-Keyword-Pluggable/Keyword-Pluggable-1.04/
H A DPluggable.xs104 #define PL_rsfp_filters (PL_parser->rsfp_filters)
109 #define PL_parser_filtered (PL_parser->filtered)
127 if (PL_parser && PL_parser->error_count) { in kw_handler()
218 sv_setpvn(sv, PL_parser->bufptr, PL_parser->bufend - PL_parser->bufptr); in total_recall()
219 lex_unstuff(PL_parser->bufend); /* you saw nothing */ in total_recall()
221 if (PL_parser->rsfp || PL_parser_filtered) { in total_recall()
247 if (PL_parser->rsfp || PL_parser_filtered) { in total_recall()
/dports/math/polymake/polymake-4.5/lib/core/src/perl/
H A DShell.xxs32 if (PL_parser->yyerrstatus) {
35 …} else if (PL_parser->lex_brackets == 0 && PL_parser->lex_state == LEX_NORMAL && PL_parser->expect…
39 for (const char* b = PL_parser->bufptr; b < PL_parser->bufend; ++b) {
H A DScope.cc90 if (PL_parser->bufptr == PL_parser->bufend || *PL_parser->bufptr != '(') in parse_expression_in_parens()
92 lex_read_to(PL_parser->bufptr+1); in parse_expression_in_parens()
96 if (PL_parser->bufptr == PL_parser->bufend || *PL_parser->bufptr != ')') { in parse_expression_in_parens()
100 lex_read_to(PL_parser->bufptr+1); in parse_expression_in_parens()
852 if (PL_parser->bufptr == PL_parser->bufend || *PL_parser->bufptr != '{') { in parse_local_block()
1004 if (PL_parser->bufptr + kw.len < PL_parser->bufend in following_keyword()
1005 && !strncmp(PL_parser->bufptr, kw.ptr, kw.len) in following_keyword()
1006 && !isALNUM(PL_parser->bufptr[kw.len])) { in following_keyword()
1008 lex_read_to(PL_parser->bufptr + kw.len); in following_keyword()
1035 if (PL_parser->bufptr == PL_parser->bufend) in parse_enhanced_local()
[all …]
H A Dnamespaces.xxs1975 for (b=PL_parser->bufptr; b < PL_parser->bufend; ++b)
2003 const STRLEN oldpos = PL_parser->bufptr - PL_parser->linestart;
2005 if (PL_parser->bufptr == PL_parser->linestart + oldpos) {
2013 if (PL_parser->bufptr == PL_parser->bufend) {
2034 char c = *PL_parser->bufptr;
2077 c = *PL_parser->bufptr;
2109 *PL_parser->bufptr == '(')
2298 if (*PL_parser->bufptr == '>') {
2668 const SSize_t pos = skip_spaces(aTHX_ PL_parser->bufptr - PL_parser->linestart);
2721 assert(PL_parser->bufptr > PL_parser->linestart);
[all …]
/dports/devel/p5-XS-Parse-Sublike/XS-Parse-Sublike-0.14/hax/
H A Dparse_subsignature.c.inc20 #define PL_linestr (PL_parser->linestr)
25 # define UTF cBOOL((PL_linestr && DO_UTF8(PL_linestr)) || ( !(PL_parser->lex_flags & LEX_IGNORE_U…
33 char *context = PL_parser->oldbufptr;
34 STRLEN contlen = PL_parser->bufptr - PL_parser->oldbufptr;
45 PL_parser->error_count++;
78 yy_parser *parser = PL_parser;
105 varop->op_targ = pad_add_name_pvn(lexname, PL_parser->bufptr - lexname, 0, NULL, NULL);
159 yy_parser *parser = PL_parser;
176 if(PL_parser->error_count) {
H A Dlexer-additions.c.inc27 if(s[i] != PL_parser->bufptr[i])
31 lex_read_to(PL_parser->bufptr + i);
46 char *ident = PL_parser->bufptr;
63 STRLEN len = PL_parser->bufptr - ident;
273 char *lexname = PL_parser->bufptr;
285 if(PL_parser->bufptr - lexname == 2 && lexname[1] == '_')
288 return pad_add_name_pvn(lexname, PL_parser->bufptr - lexname, 0, NULL, NULL);
/dports/devel/p5-XS-Parse-Keyword/XS-Parse-Keyword-0.21/src/
H A Dkeyword.c35 #define PL_linestr (PL_parser->linestr)
54 char *context = PL_parser->oldbufptr; in S_yycroak()
55 STRLEN contlen = PL_parser->bufptr - PL_parser->oldbufptr; in S_yycroak()
69 PL_parser->error_count++; in S_yycroak()
86 if(PL_parser->error_count) \
95 if(s[i] != PL_parser->bufptr[i]) in MY_lex_probe_str()
109 lex_read_to(PL_parser->bufptr + len); in MY_lex_expect_str()
155 (PL_parser->preambling != NOLINE) ? PL_parser->preambling : in probe_piece()
176 lex_read_to(PL_parser->bufptr + len); in probe_piece()
338 (PL_parser->preambling != NOLINE) ? PL_parser->preambling : in parse_piece()
[all …]
/dports/devel/p5-indirect/indirect-0.39/
H A Dindirect.xs77 #if XSH_HAS_PERL(5, 10, 0) || defined(PL_parser) in indirect_hint()
78 if (!PL_parser) in indirect_hint()
136 #if XSH_HAS_PERL(5, 10, 0) || defined(PL_parser)
138 # define PL_linestr PL_parser->linestr
141 # define PL_bufptr PL_parser->bufptr
144 # define PL_oldbufptr PL_parser->oldbufptr
147 # define PL_lex_inwhat PL_parser->lex_inwhat
150 # define PL_multi_close PL_parser->multi_close
205 #if XSH_HAS_PERL(5, 10, 0) || defined(PL_parser) in indirect_call_sv()
206 if (PL_parser) in indirect_call_sv()
[all …]
/dports/devel/p5-XS-Parse-Keyword/XS-Parse-Keyword-0.21/hax/
H A Dlexer-additions.c.inc27 if(s[i] != PL_parser->bufptr[i])
31 lex_read_to(PL_parser->bufptr + i);
46 char *ident = PL_parser->bufptr;
63 STRLEN len = PL_parser->bufptr - ident;
273 char *lexname = PL_parser->bufptr;
285 if(PL_parser->bufptr - lexname == 2 && lexname[1] == '_')
288 return pad_add_name_pvn(lexname, PL_parser->bufptr - lexname, 0, NULL, NULL);
/dports/devel/p5-Filter/Filter-1.60/decrypt/
H A Ddecrypt.xs37 (PL_parser && PL_parser->rsfp_filters ? av_len(PL_parser->rsfp_filters) : 0)

12345678910>>...16