diff options
| author | Robin Houston <robin@cpan.org> | 2005-10-14 01:54:00 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-10-19 20:46:50 +0000 |
| commit | e4c5ccf3177be837114b952c25e52a6812f35eb5 (patch) | |
| tree | 3cb0b2f16a4dac34aa1f36c59756b461f2b9ba55 /embed.h | |
| parent | 76e603de23f04d6f155b7c537f88eaf478e50689 (diff) | |
| download | perl-e4c5ccf3177be837114b952c25e52a6812f35eb5.tar.gz | |
Re: [PATCH] Re: [perl #37350] $#{@$aref} in debugger gives: Bizarre copy of ARRAY in leave
Message-ID: <20051013235457.GA23386@rpc142.cs.man.ac.uk>
p4raw-id: //depot/perl@25808
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -614,6 +614,7 @@ #define call_pv Perl_call_pv #define call_sv Perl_call_sv #define despatch_signals Perl_despatch_signals +#define doref Perl_doref #define eval_pv Perl_eval_pv #define eval_sv Perl_eval_sv #define get_sv Perl_get_sv @@ -645,7 +646,6 @@ #endif #define push_scope Perl_push_scope #ifdef PERL_CORE -#define ref Perl_ref #define refkids Perl_refkids #endif #define regdump Perl_regdump @@ -2608,6 +2608,7 @@ #define call_pv(a,b) Perl_call_pv(aTHX_ a,b) #define call_sv(a,b) Perl_call_sv(aTHX_ a,b) #define despatch_signals() Perl_despatch_signals(aTHX) +#define doref(a,b,c) Perl_doref(aTHX_ a,b,c) #define eval_pv(a,b) Perl_eval_pv(aTHX_ a,b) #define eval_sv(a,b) Perl_eval_sv(aTHX_ a,b) #define get_sv(a,b) Perl_get_sv(aTHX_ a,b) @@ -2639,7 +2640,6 @@ #endif #define push_scope() Perl_push_scope(aTHX) #ifdef PERL_CORE -#define ref(a,b) Perl_ref(aTHX_ a,b) #define refkids(a,b) Perl_refkids(aTHX_ a,b) #endif #define regdump(a) Perl_regdump(aTHX_ a) |