diff options
| -rw-r--r-- | source4/build/pidl/Parse/Pidl/NDR.pm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/source4/build/pidl/Parse/Pidl/NDR.pm b/source4/build/pidl/Parse/Pidl/NDR.pm index 33d7839a3a..64d61650f7 100644 --- a/source4/build/pidl/Parse/Pidl/NDR.pm +++ b/source4/build/pidl/Parse/Pidl/NDR.pm @@ -592,10 +592,13 @@ sub ContainsDeferred($$) { my ($e,$l) = @_; - do { + return 1 if ($l->{CONTAINS_DEFERRED}); + + while ($l = GetNextLevel($e,$l)) + { return 1 if ($l->{IS_DEFERRED}); return 1 if ($l->{CONTAINS_DEFERRED}); - } while ($l = GetNextLevel($e,$l)); + } return 0; } |