… | … | ||
---|---|---|---|
964 | } | 964 | } |
965 | 965 | ||
966 | SV * | 966 | SV * |
967 | cfperl_result (int idx) | 967 | cfperl_result (int idx) |
968 | { | 968 | { |
969 | AV *av = get_av ("cf::invoke_results", 0); | 969 | AV *av = get_av ("cf::INVOKE_RESULTS", 0); |
970 | if (!av) | 970 | if (!av) |
971 | return &PL_sv_undef; | 971 | return &PL_sv_undef; |
972 | 972 | ||
973 | SV **sv = av_fetch (av, idx, 0); | 973 | SV **sv = av_fetch (av, idx, 0); |
974 | if (!sv) | 974 | if (!sv) |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |