From 3ae1b22641a16d4d08aba688616c0f7cefb7d1f5 Mon Sep 17 00:00:00 2001
From: Nicholas Clark <nick@ccl4.org>
Date: Wed, 23 Jan 2008 09:22:01 +0000
Subject: Deprecate (and remove core use of ) Nullav, Nullcv, Nullgv, Nullhe,
 Nullhek and Nullhv. Nullop is going to be a bit less simple.

p4raw-id: //depot/perl@33051
---
 av.h | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'av.h')

diff --git a/av.h b/av.h
index 3c40dc8fe8..8874045099 100644
--- a/av.h
+++ b/av.h
@@ -57,6 +57,8 @@ typedef struct {
 =for apidoc AmU||Nullav
 Null AV pointer.
 
+(deprecated - use C<(AV *)NULL> instead)
+
 =head1 Array Manipulation Functions
 
 =for apidoc Am|int|AvFILL|AV* av
@@ -65,7 +67,9 @@ Same as C<av_len()>.  Deprecated, use C<av_len()> instead.
 =cut
 */
 
-#define Nullav Null(AV*)
+#ifndef PERL_CORE
+#  define Nullav Null(AV*)
+#endif
 
 #define AvARRAY(av)	((av)->sv_u.svu_array)
 #define AvALLOC(av)	(*((SV***)&((XPVAV*)  SvANY(av))->xav_alloc))
-- 
cgit v1.2.1