Home
last modified time | relevance | path

Searched refs:sub_pmc (Results 1 – 17 of 17) sorted by relevance

/dports/lang/parrot/parrot-8.1.0/src/
H A Dsub.c45 Parrot_sub_full_sub_name(PARROT_INTERP, ARGIN_NULLOK(PMC* sub_pmc)) in Parrot_sub_full_sub_name() argument
48 if (sub_pmc && VTABLE_defined(interp, sub_pmc)) { in Parrot_sub_full_sub_name()
51 PMC_get_sub(interp, sub_pmc, sub); in Parrot_sub_full_sub_name()
387 Parrot_sub_capture_lex(PARROT_INTERP, ARGMOD(PMC *sub_pmc)) in Parrot_sub_capture_lex() argument
421 PMC_get_sub(interp, sub_pmc, sub); in Parrot_sub_capture_lex()
426 PARROT_GC_WRITE_BARRIER(interp, sub_pmc); in Parrot_sub_capture_lex()
450 Parrot_sub_new_closure(PARROT_INTERP, ARGIN(PMC *sub_pmc)) in Parrot_sub_new_closure() argument
453 PMC * const clos_pmc = VTABLE_clone(interp, sub_pmc); in Parrot_sub_new_closure()
555 PMC *key, *sub_pmc; in Parrot_get_sub_pmc_from_subclass() local
567 if (sub_pmc->vtable->base_type == enum_class_Sub) { in Parrot_get_sub_pmc_from_subclass()
[all …]
H A Dnamespace.c72 ARGIN(PMC *sub_pmc),
80 , PARROT_ASSERT_ARG(sub_pmc))
99 , PARROT_ASSERT_ARG(sub_pmc) \
284 get_namespace_pmc(PARROT_INTERP, ARGIN(PMC *sub_pmc)) in get_namespace_pmc() argument
290 PMC_get_sub(interp, sub_pmc, sub); in get_namespace_pmc()
325 PMC_get_sub(interp, sub_pmc, sub); in store_sub_in_multi()
335 VTABLE_push_pmc(interp, multisub, sub_pmc); in store_sub_in_multi()
339 VTABLE_push_pmc(interp, multisub, sub_pmc); in store_sub_in_multi()
730 PMC_get_sub(interp, sub_pmc, sub); in Parrot_ns_store_sub()
733 ns = get_namespace_pmc(interp, sub_pmc); in Parrot_ns_store_sub()
[all …]
H A Dextend.c144 Parrot_ext_call(PARROT_INTERP, ARGIN(Parrot_PMC sub_pmc), in Parrot_ext_call() argument
155 Parrot_pcc_invoke_from_sig_object(interp, sub_pmc, call_obj); in Parrot_ext_call()
164 Parrot_pcc_invoke_from_sig_object(interp, sub_pmc, call_obj); in Parrot_ext_call()
H A Dmultidispatch.c134 ARGIN(PMC *sub_pmc))
197 , PARROT_ASSERT_ARG(sub_pmc))
538 Parrot_mmd_get_cached_multi_sig(PARROT_INTERP, ARGIN(PMC *sub_pmc)) in Parrot_mmd_get_cached_multi_sig() argument
541 if (VTABLE_isa(interp, sub_pmc, CONST_STRING(interp, "Sub"))) { in Parrot_mmd_get_cached_multi_sig()
545 PMC_get_sub(interp, sub_pmc, sub); in Parrot_mmd_get_cached_multi_sig()
554 PARROT_GC_WRITE_BARRIER(interp, sub_pmc); in Parrot_mmd_get_cached_multi_sig()
H A Dvtable.tbl249 void add_method(STRING* method_name, PMC* sub_pmc) :write
252 void add_vtable_override(STRING* vtable_name, PMC* sub_pmc) :write
/dports/lang/parrot/parrot-8.1.0/src/dynpmc/
H A Dsubproxy.pmc33 PMC *rsub_pmc, *sub_pmc;
45 sub_pmc = Parrot_key_next(INTERP, key);
46 if (!sub_pmc)
52 INTERP->root_namespace, sub_pmc);
/dports/lang/parrot/parrot-8.1.0/src/packfile/
H A Dapi.c61 ARGMOD(PMC *sub_pmc),
65 FUNC_MODIFIES(*sub_pmc);
167 ARGIN(const PMC *sub_pmc))
181 , PARROT_ASSERT_ARG(sub_pmc))
229 , PARROT_ASSERT_ARG(sub_pmc))
520 PMC_get_sub(interp, sub_pmc, sub); in Parrot_pf_subs_by_tag()
752 PMC_get_sub(interp, sub_pmc, sub); in do_1_sub_pragma()
1001 if (VTABLE_isa(interp, sub_pmc, SUB)) { in pf_do_sub_pragmas()
1004 PMC_get_sub(interp, sub_pmc, sub); in pf_do_sub_pragmas()
2847 PMC_get_sub(interp, sub_pmc, sub); in set_current_sub()
[all …]
/dports/lang/parrot/parrot-8.1.0/src/pmc/
H A Dcoroutine.pmc38 static void print_sub_name(PARROT_INTERP, ARGIN(PMC *sub_pmc))
44 , PARROT_ASSERT_ARG(sub_pmc))
63 =item C<static void print_sub_name(PARROT_INTERP, PMC *sub_pmc)>
72 print_sub_name(PARROT_INTERP, ARGIN(PMC *sub_pmc))
81 GETATTR_Coroutine_ctx(interp, sub_pmc, ctx);
82 GETATTR_Coroutine_yield(interp, sub_pmc, yield);
84 if (!yield && (PObj_get_FLAGS(sub_pmc) & SUB_FLAG_CORO_FF))
87 Parrot_sub_full_sub_name(interp, sub_pmc));
90 !(PObj_get_FLAGS(sub_pmc) & SUB_FLAG_CORO_FF) ?
92 Parrot_sub_full_sub_name(interp, sub_pmc));
[all …]
H A Dparrotinterpreter.pmc416 PMC * const sub_pmc = Parrot_pcc_get_sub(INTERP, ctx);
423 if (!PMC_IS_NULL(sub_pmc)
424 && sub_pmc->vtable->base_type == enum_class_Sub) {
429 PMC_get_sub(INTERP, sub_pmc, sub);
H A Dcallcontext.pmc1622 PMC *sub_pmc = Parrot_pcc_get_sub(INTERP, cur_ctx);
1624 if (!sub_pmc)
1625 sub_pmc = PMCNULL;
1627 VTABLE_set_pmc_keyed_str(INTERP, frame, CONST_STRING(INTERP, "sub"), sub_pmc);
1630 if (!PMC_IS_NULL(sub_pmc)) {
1631 PMC_get_sub(INTERP, sub_pmc, sub);
H A Ddefault.pmc325 VTABLE void add_method(STRING *method_name, PMC *sub_pmc) {
327 method_name, sub_pmc);
/dports/lang/parrot/parrot-8.1.0/include/parrot/
H A Dsub.h164 void Parrot_sub_capture_lex(PARROT_INTERP, ARGMOD(PMC *sub_pmc))
167 FUNC_MODIFIES(*sub_pmc);
190 STRING* Parrot_sub_full_sub_name(PARROT_INTERP, ARGIN_NULLOK(PMC* sub_pmc))
196 PMC* Parrot_sub_new_closure(PARROT_INTERP, ARGIN(PMC *sub_pmc))
244 , PARROT_ASSERT_ARG(sub_pmc))
256 , PARROT_ASSERT_ARG(sub_pmc))
H A Dextend.h60 ARGIN(Parrot_PMC sub_pmc),
88 , PARROT_ASSERT_ARG(sub_pmc) \
H A Dnamespace.h134 void Parrot_ns_store_sub(PARROT_INTERP, ARGIN(PMC *sub_pmc))
187 , PARROT_ASSERT_ARG(sub_pmc))
/dports/lang/parrot/parrot-8.1.0/compilers/imcc/
H A Dpbc.c129 ARGIN(PMC *sub_pmc),
313 , PARROT_ASSERT_ARG(sub_pmc) \
1380 VTABLE_init_pmc(imcc->interp, lex_info, sub_pmc); in create_lexinfo()
1427 return s->unit->sub_pmc; in find_outer()
1486 PMC *sub_pmc; in add_const_pmc_sub() local
1543 sub_pmc = Parrot_pmc_new(imcc->interp, type); in add_const_pmc_sub()
1551 sub_pmc = Parrot_pmc_new(imcc->interp, hlltype); in add_const_pmc_sub()
1555 PMC_get_sub(imcc->interp, sub_pmc, sub); in add_const_pmc_sub()
1666 Parrot_ns_store_sub(imcc->interp, sub_pmc); in add_const_pmc_sub()
1671 unit->sub_pmc = sub_pmc; in add_const_pmc_sub()
[all …]
H A Dunit.h64 PMC *sub_pmc; /* this sub */ member
/dports/lang/parrot/parrot-8.1.0/docs/pdds/
H A Dpdd17_pmc.pod1465 void add_method(INTERP, PMC *self, STRING *method_name, PMC *sub_pmc)
1480 PMC *sub_pmc)