summaryrefslogtreecommitdiff
path: root/source4/pidl/lib/Parse/Pidl/Samba4/TDR.pm
diff options
context:
space:
mode:
authorJelmer Vernooij <jelmer@samba.org>2007-01-03 15:34:01 +0000
committerGerald (Jerry) Carter <jerry@samba.org>2007-10-10 14:36:04 -0500
commitf97f11eab25f0c294ff02b3c4485d7a0a91b5501 (patch)
treee1a2547a15afc65dcb118a39a74ae1b4e4a865f7 /source4/pidl/lib/Parse/Pidl/Samba4/TDR.pm
parentbc32b30011ec0b35d40f659675f9e4cc28ec3c79 (diff)
downloadsamba-f97f11eab25f0c294ff02b3c4485d7a0a91b5501.tar.gz
samba-f97f11eab25f0c294ff02b3c4485d7a0a91b5501.tar.bz2
samba-f97f11eab25f0c294ff02b3c4485d7a0a91b5501.zip
r20511: Combine warnings/errors/fatal functions and move them to Parse::Pidl.
(This used to be commit 959adfd0a682a4894c3bdd4ae9c6fc3ebfeeef1f)
Diffstat (limited to 'source4/pidl/lib/Parse/Pidl/Samba4/TDR.pm')
-rw-r--r--source4/pidl/lib/Parse/Pidl/Samba4/TDR.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/source4/pidl/lib/Parse/Pidl/Samba4/TDR.pm b/source4/pidl/lib/Parse/Pidl/Samba4/TDR.pm
index 592961dee2..bc8d27a283 100644
--- a/source4/pidl/lib/Parse/Pidl/Samba4/TDR.pm
+++ b/source4/pidl/lib/Parse/Pidl/Samba4/TDR.pm
@@ -4,6 +4,7 @@
# released under the GNU GPL
package Parse::Pidl::Samba4::TDR;
+use Parse::Pidl qw(fatal);
use Parse::Pidl::Util qw(has_property ParseExpr is_constant);
use Parse::Pidl::Samba4 qw(is_intree choose_header);
@@ -20,7 +21,6 @@ sub indent() { $tabs.="\t"; }
sub deindent() { $tabs = substr($tabs, 1); }
sub pidl($) { $ret .= $tabs.(shift)."\n"; }
sub pidl_hdr($) { $ret_hdr .= (shift)."\n"; }
-sub fatal($$) { my ($e,$s) = @_; die("$e->{FILE}:$e->{LINE}: $s\n"); }
sub typearg($) {
my $t = shift;
return(", const char *name") if ($t eq "print");