diff options
author | Jelmer Vernooij <jelmer@samba.org> | 2005-12-25 14:59:21 +0000 |
---|---|---|
committer | Gerald (Jerry) Carter <jerry@samba.org> | 2007-10-10 13:47:43 -0500 |
commit | a4fe56c06a95bf5278a4a0efdd976febc2b9866b (patch) | |
tree | e182f8bf0dc1842298f5bb714192bc6177044416 /source4/pidl/lib/Parse/Pidl/Util.pm | |
parent | 8e924678b205910a5147ceb948d4db86e3a9ae0c (diff) | |
download | samba-a4fe56c06a95bf5278a4a0efdd976febc2b9866b.tar.gz samba-a4fe56c06a95bf5278a4a0efdd976febc2b9866b.tar.bz2 samba-a4fe56c06a95bf5278a4a0efdd976febc2b9866b.zip |
r12481: Move parser-specific utility functions to idl.yp, remove some unused functions
Allow the use of non-typedef structs and unions when declaring variables. Allow the
use of the 'signed' and 'unsigned' qualifiers for integer types
(This used to be commit bc6b45e242c8d7b2ef1a6e6d3eb172c27afd952d)
Diffstat (limited to 'source4/pidl/lib/Parse/Pidl/Util.pm')
-rw-r--r-- | source4/pidl/lib/Parse/Pidl/Util.pm | 42 |
1 files changed, 0 insertions, 42 deletions
diff --git a/source4/pidl/lib/Parse/Pidl/Util.pm b/source4/pidl/lib/Parse/Pidl/Util.pm index fec1301a59..ec6a1420ab 100644 --- a/source4/pidl/lib/Parse/Pidl/Util.pm +++ b/source4/pidl/lib/Parse/Pidl/Util.pm @@ -13,48 +13,6 @@ $VERSION = '0.01'; use strict; ##################################################################### -# flatten an array of arrays into a single array -sub FlattenArray2($) -{ - my $a = shift; - my @b; - for my $d (@{$a}) { - for my $d1 (@{$d}) { - push(@b, $d1); - } - } - return \@b; -} - -##################################################################### -# flatten an array of arrays into a single array -sub FlattenArray($) -{ - my $a = shift; - my @b; - for my $d (@{$a}) { - for my $d1 (@{$d}) { - push(@b, $d1); - } - } - return \@b; -} - -##################################################################### -# flatten an array of hashes into a single hash -sub FlattenHash($) -{ - my $a = shift; - my %b; - for my $d (@{$a}) { - for my $k (keys %{$d}) { - $b{$k} = $d->{$k}; - } - } - return \%b; -} - -##################################################################### # a dumper wrapper to prevent dependence on the Data::Dumper module # unless we actually need it sub MyDumper($) |