Lines Matching refs:rc
74 LONG rc;
85 rc = pRexxRegisterFunctionExe(handlerNames[n], handlers[n]);
86 if (rc == RXFUNC_DEFINED)
111 rc = pRexxStart(0, args, /* No arguments */
143 if (rc || SvTRUE(GvSV(PL_errgv))) {
148 Perl_croak(aTHX_ "REXX compartment returned non-zero status %li", rc);
161 int i, rc;
184 rc = perl_call_pv(name, G_SCALAR | G_EVAL);
186 rc = perl_call_sv(cv, G_SCALAR | G_EVAL);
188 rc = -1;
192 if (rc == 1) /* must be! */
194 if (rc == 1 && SvOK(res)) {
202 rc = 0;
204 rc = 0;
211 return rc == 1 ? 0 : 1; /* 0 means SUCCESS */
311 ULONG rc;
324 rc = pRexxRegisterSubcomExe("PERLEVAL", (PFN)&SubCommandPerlEval, NULL);
353 ULONG rc;
383 rc = pRexxVariablePool(vars);
385 fprintf(stderr, " rc=%#lX\n", rc);
386 RETVAL = (rc & ~RXSHV_NEWV) ? FALSE : TRUE;
397 ULONG rc;
418 rc = pRexxVariablePool(vars);
419 if (!(rc & ~RXSHV_NEWV)) {
440 fprintf(stderr, " rc=%#lX\n", rc);
451 ULONG rc;
466 rc = pRexxVariablePool(&sv);
467 } while (!rc && memcmp(stem, sv.shvname.strptr, len) != 0);
468 if (!rc) {
488 } else if (rc != RXSHV_LVAR) {
489 die("Error %i when in _next", rc);
492 fprintf(stderr, " rc=%#lX\n", rc);