Author: metze Date: 2007-08-15 09:18:25 +0000 (Wed, 15 Aug 2007) New Revision: 24452
WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=24452 Log: bail out instead of only giving a warning on incorrect idl files metze Modified: branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/NDR.pm Changeset: Modified: branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/NDR.pm =================================================================== --- branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/NDR.pm 2007-08-15 09:13:51 UTC (rev 24451) +++ branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/NDR.pm 2007-08-15 09:18:25 UTC (rev 24452) @@ -244,15 +244,15 @@ } 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 @@ ($x->{TYPE} eq "INTERFACE") && ValidInterface($x); ($x->{TYPE} eq "IMPORTLIB") && - warning($x, "importlib() not supported"); + fatal($x, "importlib() not supported"); } }
