Lines Matching defs:mark

2428 Perl_do_aexec5(pTHX_ SV *really, SV **mark, SV **sp,
2435     assert(sp >= mark);
2440         Newx(argv, sp - mark + 1, const char*);
2444         while (++mark <= sp) {
2445             if (*mark) {
2446                 char *arg = savepv(SvPV_nolen_const(*mark));
2611 Perl_apply(pTHX_ I32 type, SV **mark, SV **sp)
2618     SV ** const oldmark = mark;
2645         while (++mark <= sp) {
2646             if (SvTAINTED(*mark)) {
2651         mark = oldmark;
2656         if (++mark <= sp) {
2657             val = SvIV(*mark);
2659             tot = sp - mark;
2660             while (++mark <= sp) {
2662                 if ((gv = MAYBE_DEREF_GV(*mark))) {
2682                     const char *name = SvPV_nomg_const(*mark, len);
2695         if (sp - mark > 2) {
2697             val = SvIVx(*++mark);
2698             val2 = SvIVx(*++mark);
2700             tot = sp - mark;
2701             while (++mark <= sp) {
2703                 if ((gv = MAYBE_DEREF_GV(*mark))) {
2723                     const char *name = SvPV_nomg_const(*mark, len);
2743         if (mark == sp)
2745         s = SvPVx_const(*++mark, len);
2759                                 SVfARG(*mark));
2763             val = SvIV(*mark);
2771         tot = sp - mark;
2773         while (++mark <= sp) {
2775             SvGETMAGIC(*mark);
2776             if (!(SvNIOK(*mark) || looks_like_number(*mark)))
2778             proc = SvIV_nomg(*mark);
2795         tot = sp - mark;
2796         while (++mark <= sp) {
2797             s = SvPV_const(*mark, len);
2852         if (sp - mark > 2) {
2867            SV* const accessed = *++mark;
2868            SV* const modified = *++mark;
2892             tot = sp - mark;
2893             while (++mark <= sp) {
2895                 if ((gv = MAYBE_DEREF_GV(*mark))) {
2915                     const char * const name = SvPV_nomg_const(*mark, len);
3045 Perl_do_ipcget(pTHX_ I32 optype, SV **mark, SV **sp)
3047     const key_t key = (key_t)SvNVx(*++mark);
3048     SV *nsv = optype == OP_MSGGET ? NULL : *++mark;
3049     const I32 flags = SvIVx(*++mark);
3079 Perl_do_ipcctl(pTHX_ I32 optype, SV **mark, SV **sp)
3083     const I32 id  = SvIVx(*++mark);
3085     const I32 n   = (optype == OP_SEMCTL) ? SvIVx(*++mark) : 0;
3087     const I32 cmd = SvIVx(*++mark);
3088     SV * const astr = *++mark;
3227 Perl_do_msgsnd(pTHX_ SV **mark, SV **sp)
3234     const I32 id = SvIVx(*++mark);
3235     SV * const mstr = *++mark;
3236     const I32 flags = SvIVx(*++mark);
3253     PERL_UNUSED_ARG(mark);
3261 Perl_do_msgrcv(pTHX_ SV **mark, SV **sp)
3267     const I32 id = SvIVx(*++mark);
3268     SV * const mstr = *++mark;
3276     SSize_t msize = SvIVx(*++mark);
3277     mtype = (long)SvIVx(*++mark);
3278     flags = SvIVx(*++mark);
3302     PERL_UNUSED_ARG(mark);
3310 Perl_do_semop(pTHX_ SV **mark, SV **sp)
3314     const I32 id = SvIVx(*++mark);
3315     SV * const opstr = *++mark;
3355 Perl_do_shmio(pTHX_ I32 optype, SV **mark, SV **sp)
3360     const I32 id = SvIVx(*++mark);
3361     SV * const mstr = *++mark;
3362     const I32 mpos = SvIVx(*++mark);
3363     const I32 msize = SvIVx(*++mark);