From eab315fe1e584e96fc84cee96ec842610b2dcdce Mon Sep 17 00:00:00 2001 From: Stefan Metzmacher Date: Wed, 15 Aug 2007 09:18:25 +0000 Subject: r24452: bail out instead of only giving a warning on incorrect idl files metze (This used to be commit 8aacab6f6a04d0f56bed945e07cd894ac1344ace) --- source4/pidl/lib/Parse/Pidl/NDR.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'source4/pidl/lib') diff --git a/source4/pidl/lib/Parse/Pidl/NDR.pm b/source4/pidl/lib/Parse/Pidl/NDR.pm index d2556cb8e6..a3282226a1 100644 --- a/source4/pidl/lib/Parse/Pidl/NDR.pm +++ b/source4/pidl/lib/Parse/Pidl/NDR.pm @@ -244,15 +244,15 @@ sub GetElementLevelTable($) } if (scalar(@size_is) > 0) { - warning($e, "size_is() on non-array element"); + fatal($e, "size_is() on non-array element"); } if (scalar(@length_is) > 0) { - warning($e, "length_is() on non-array element"); + fatal($e, "length_is() on non-array element"); } if (has_property($e, "string")) { - warning($e, "string() attribute on non-array element"); + fatal($e, "string() attribute on non-array element"); } push (@$order, { @@ -1142,7 +1142,7 @@ sub Validate($) ($x->{TYPE} eq "INTERFACE") && ValidInterface($x); ($x->{TYPE} eq "IMPORTLIB") && - warning($x, "importlib() not supported"); + fatal($x, "importlib() not supported"); } } -- cgit