summaryrefslogtreecommitdiff
path: root/source4/build/pidl/util.pm
diff options
context:
space:
mode:
authorJelmer Vernooij <jelmer@samba.org>2005-02-18 20:02:32 +0000
committerGerald (Jerry) Carter <jerry@samba.org>2007-10-10 13:10:46 -0500
commitb37252d4ca1b3f6b20026eb0bc4c8b1be94b187e (patch)
treed93ac38b35f9d703dceb563c192216e1ac7c8191 /source4/build/pidl/util.pm
parent2908e5837c6f68dea56bbb96b359c5600102440b (diff)
downloadsamba-b37252d4ca1b3f6b20026eb0bc4c8b1be94b187e.tar.gz
samba-b37252d4ca1b3f6b20026eb0bc4c8b1be94b187e.tar.bz2
samba-b37252d4ca1b3f6b20026eb0bc4c8b1be94b187e.zip
r5447: Add some utility functions for arrays and use them.
(This used to be commit a251712670e1daac949221407ae979b363dbc105)
Diffstat (limited to 'source4/build/pidl/util.pm')
-rw-r--r--source4/build/pidl/util.pm23
1 files changed, 0 insertions, 23 deletions
diff --git a/source4/build/pidl/util.pm b/source4/build/pidl/util.pm
index 8e87215fd8..f5971c1624 100644
--- a/source4/build/pidl/util.pm
+++ b/source4/build/pidl/util.pm
@@ -278,29 +278,6 @@ sub is_constant($)
return 0;
}
-# return 1 if this is a fixed array
-sub is_fixed_array($)
-{
- my $e = shift;
- my $len = $e->{"ARRAY_LEN"};
- if (defined $len && is_constant($len)) {
- return 1;
- }
- return 0;
-}
-
-# return 1 if this is a inline array
-sub is_inline_array($)
-{
- my $e = shift;
- my $len = $e->{"ARRAY_LEN"};
- if (is_fixed_array($e) ||
- defined $len && $len ne "*") {
- return 1;
- }
- return 0;
-}
-
# return a "" quoted string, unless already quoted
sub make_str($)
{