svn commit: samba r24515 - in
branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/Samba4: .
metze at samba.org
metze at samba.org
Fri Aug 17 11:24:26 GMT 2007
Author: metze
Date: 2007-08-17 11:24:25 +0000 (Fri, 17 Aug 2007)
New Revision: 24515
WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=24515
Log:
use fatal() wrapper instead of die() directly
metze
Modified:
branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/Samba4/Header.pm
Changeset:
Modified: branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/Samba4/Header.pm
===================================================================
--- branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/Samba4/Header.pm 2007-08-17 11:09:46 UTC (rev 24514)
+++ branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/Samba4/Header.pm 2007-08-17 11:24:25 UTC (rev 24515)
@@ -7,6 +7,7 @@
package Parse::Pidl::Samba4::Header;
use strict;
+use Parse::Pidl qw(fatal);
use Parse::Pidl::Typelist qw(mapTypeName scalar_is_reference);
use Parse::Pidl::Util qw(has_property is_constant);
use Parse::Pidl::Samba4 qw(is_intree);
@@ -149,13 +150,13 @@
$name = $1;
$value = $2;
$with_val = 1;
- die ("you can't mix enum member with values and without values!")
+ fatal($e->{ORIGINAL}, "you can't mix enum member with values and without values!")
unless ($without_val == 0);
} else {
$name = $t;
$value = $count++;
$without_val = 1;
- die ("you can't mix enum member with values and without values!")
+ fatal($e->{ORIGINAL}, "you can't mix enum member with values and without values!")
unless ($with_val == 0);
}
pidl "#define $name ( $value )\n";
More information about the samba-cvs
mailing list