summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--pidl/lib/Parse/Pidl/Samba4/NDR/Parser.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/pidl/lib/Parse/Pidl/Samba4/NDR/Parser.pm b/pidl/lib/Parse/Pidl/Samba4/NDR/Parser.pm
index 0ea7a683d95..94428ec2037 100644
--- a/pidl/lib/Parse/Pidl/Samba4/NDR/Parser.pm
+++ b/pidl/lib/Parse/Pidl/Samba4/NDR/Parser.pm
@@ -980,7 +980,7 @@ sub ParseDataPull($$$$$$$)
my $pl = GetPrevLevel($e, $l);
my $range = has_property($e, "range");
- if ($range and $pl->{TYPE} ne "ARRAY") {
+ if ($range and (not $pl or $pl->{TYPE} ne "ARRAY")) {
$var_name = get_value_of($var_name);
my $signed = Parse::Pidl::Typelist::is_signed($l->{DATA_TYPE});
my ($low, $high) = parse_range($range);