diff options
author | Dave Mitchell <davem@fdisolutions.com> | 2004-07-23 09:52:59 +0000 |
---|---|---|
committer | Dave Mitchell <davem@fdisolutions.com> | 2004-07-23 09:52:59 +0000 |
commit | f39bc417872f70cd842818eabb72f1c97d78cdd2 (patch) | |
tree | 580290513860e81838a2510e5ea1fa7fc109e826 /cc_runtime.h | |
parent | 0dfdcd8a63a82bd61087d84a6f130e03a4b20ed9 (diff) | |
download | perl-f39bc417872f70cd842818eabb72f1c97d78cdd2.tar.gz |
remove the return stack PL_retstack, and store return ops in the CX
structure directly instead
p4raw-id: //depot/perl@23156
Diffstat (limited to 'cc_runtime.h')
-rw-r--r-- | cc_runtime.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/cc_runtime.h b/cc_runtime.h index 6a1668d2aa..3815d3a5e3 100644 --- a/cc_runtime.h +++ b/cc_runtime.h @@ -54,7 +54,7 @@ switch (ret) { \ case 0: \ PL_op = ppaddr(aTHX); \ - PL_retstack[PL_retstack_ix - 1] = Nullop; \ + /* XXX PL_retstack[PL_retstack_ix - 1] = Nullop; */ \ if (PL_op != nxt) CALLRUNOPS(); \ JMPENV_POP; \ break; \ |