From 55eaaa223800a45ee8ea3f85904f722f91547dd8 Mon Sep 17 00:00:00 2001 From: Jelmer Vernooij Date: Wed, 22 Nov 2006 17:13:19 +0000 Subject: r19845: Add warning for pointer_default_top() (This used to be commit 3f0da2388d30959c93483b102fbfab75a8381fef) --- source4/pidl/lib/Parse/Pidl/NDR.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'source4/pidl/lib/Parse') diff --git a/source4/pidl/lib/Parse/Pidl/NDR.pm b/source4/pidl/lib/Parse/Pidl/NDR.pm index f35ea461aa..ef27c7141f 100644 --- a/source4/pidl/lib/Parse/Pidl/NDR.pm +++ b/source4/pidl/lib/Parse/Pidl/NDR.pm @@ -310,7 +310,6 @@ sub pointer_type($) return "ref" if (has_property($e, "ref")); return "ptr" if (has_property($e, "ptr")); - return "sptr" if (has_property($e, "sptr")); return "unique" if (has_property($e, "unique")); return "relative" if (has_property($e, "relative")); return "ignore" if (has_property($e, "ignore")); @@ -607,6 +606,8 @@ sub ParseInterface($) if (not has_property($idl, "pointer_default_top")) { $idl->{PROPERTIES}->{pointer_default_top} = "ref"; + } else { + nonfatal($idl, "pointer_default_top() is a pidl extension and should not be used"); } foreach my $d (@{$idl->{DATA}}) { -- cgit