From 34664338f3c0bd9acbb2ada3d92d482e30cbdf1c Mon Sep 17 00:00:00 2001
From: Stefan Metzmacher <metze@samba.org>
Date: Wed, 26 Jan 2011 08:48:34 +0100
Subject: pidl:Typelist: fix perl warnings about recursiv function calls

metze

Autobuild-User: Stefan Metzmacher <metze@samba.org>
Autobuild-Date: Wed Jan 26 10:59:04 CET 2011 on sn-devel-104
---
 pidl/lib/Parse/Pidl/Typelist.pm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'pidl')

diff --git a/pidl/lib/Parse/Pidl/Typelist.pm b/pidl/lib/Parse/Pidl/Typelist.pm
index 4733f91565f..a89b1a74eb4 100644
--- a/pidl/lib/Parse/Pidl/Typelist.pm
+++ b/pidl/lib/Parse/Pidl/Typelist.pm
@@ -128,6 +128,7 @@ sub getType($)
 	return $types{$t};
 }
 
+sub typeIs($$);
 sub typeIs($$)
 {
 	my ($t,$tt) = @_;
-- 
cgit