From e4c5ccf3177be837114b952c25e52a6812f35eb5 Mon Sep 17 00:00:00 2001 From: Robin Houston Date: Fri, 14 Oct 2005 01:54:00 +0000 Subject: 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 --- op.h | 3 +++ 1 file changed, 3 insertions(+) (limited to 'op.h') diff --git a/op.h b/op.h index 6482d20fee..0f54a67095 100644 --- a/op.h +++ b/op.h @@ -507,6 +507,9 @@ struct loop { #define PERL_LOADMOD_NOIMPORT 0x2 #define PERL_LOADMOD_IMPORT_OPS 0x4 +/* used in perly.y */ +#define ref(o, type) doref(o, type, TRUE) + #ifdef USE_REENTRANT_API #include "reentr.h" #endif -- cgit v1.2.1