Guest User

Untitled

a guest
May 27th, 2018
80
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.83 KB | None | 0 0
  1. diff --git a/pidl/lib/Parse/Pidl/Samba3/ServerNDR.pm b/pidl/lib/Parse/Pidl/Samba3/ServerNDR.pm
  2. index e5d8f1c..eb3cdf2 100644
  3. --- a/pidl/lib/Parse/Pidl/Samba3/ServerNDR.pm
  4. +++ b/pidl/lib/Parse/Pidl/Samba3/ServerNDR.pm
  5. @@ -142,6 +142,13 @@ sub ParseFunction($$)
  6. my @dir = @{$_->{DIRECTION}};
  7. if (grep(/in/, @dir) and grep(/out/, @dir)) {
  8. pidl "r->out.$_->{NAME} = r->in.$_->{NAME};";
  9. + }
  10. + }
  11. +
  12. + foreach (@{$fn->{ELEMENTS}}) {
  13. + my @dir = @{$_->{DIRECTION}};
  14. + if (grep(/in/, @dir) and grep(/out/, @dir)) {
  15. + # noop
  16. } elsif (grep(/out/, @dir) and not
  17. has_property($_, "represent_as")) {
  18. AllocOutVar($_, "r", "r->out.$_->{NAME}", $env);
Add Comment
Please, Sign In to add comment