r5447: Add some utility functions for arrays and use them.

[samba.git] / source4 / build / pidl / util.pm

diff --git a/source4/build/pidl/util.pm b/source4/build/pidl/util.pm
index 8e87215fd879f85308730d5e8a01e8353d049882..f5971c1624a6e02b3e7bf078325df535cccc5824 100644 (file)
--- 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($)
 {