git.samba.org
/
sfrench
/
samba-autobuild
/
.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
pidl:NDR/Parser: add "skip_noinit" element
[sfrench/samba-autobuild/.git]
/
pidl
/
lib
/
Parse
/
Pidl
/
Samba4
/
NDR
/
Parser.pm
diff --git
a/pidl/lib/Parse/Pidl/Samba4/NDR/Parser.pm
b/pidl/lib/Parse/Pidl/Samba4/NDR/Parser.pm
index eff5a1f139a6e4b6233b87420a7e404457d397af..a32e9eb4a0dfb0f352d0dff5a69eda253a95fcd0 100644
(file)
--- a/
pidl/lib/Parse/Pidl/Samba4/NDR/Parser.pm
+++ b/
pidl/lib/Parse/Pidl/Samba4/NDR/Parser.pm
@@
-721,7
+721,7
@@
sub ParseElementPush($$$$$$)
my $var_name = $env->{$e->{NAME}};
my $var_name = $env->{$e->{NAME}};
- if (has_property($e, "skip")) {
+ if (has_property($e, "skip")
or has_property($e, "skip_noinit")
) {
$self->pidl("/* [skip] '$var_name' */");
return;
}
$self->pidl("/* [skip] '$var_name' */");
return;
}
@@
-1126,7
+1126,7
@@
sub ParseElementPullLevel
my $ndr_flags = CalcNdrFlags($l, $primitives, $deferred);
my $array_length = undef;
my $ndr_flags = CalcNdrFlags($l, $primitives, $deferred);
my $array_length = undef;
- if (has_property($e, "skip")) {
+ if (has_property($e, "skip")
or has_property($e, "skip_noinit")
) {
$self->pidl("/* [skip] '$var_name' */");
return;
}
$self->pidl("/* [skip] '$var_name' */");
return;
}
@@
-1655,7
+1655,7
@@
sub DeclarePtrVariables($$)
{
my ($self,$e) = @_;
{
my ($self,$e) = @_;
- if (has_property($e, "skip")) {
+ if (has_property($e, "skip")
or has_property($e, "skip_noinit")
) {
return;
}
return;
}
@@
-1676,7
+1676,7
@@
sub DeclareArrayVariables($$;$)
{
my ($self,$e,$pull) = @_;
{
my ($self,$e,$pull) = @_;
- if (has_property($e, "skip")) {
+ if (has_property($e, "skip")
or has_property($e, "skip_noinit")
) {
return;
}
return;
}
@@
-1698,7
+1698,7
@@
sub DeclareArrayVariablesNoZero($$$)
{
my ($self,$e,$env) = @_;
{
my ($self,$e,$env) = @_;
- if (has_property($e, "skip")) {
+ if (has_property($e, "skip")
or has_property($e, "skip_noinit")
) {
return;
}
return;
}
@@
-1719,7
+1719,7
@@
sub DeclareMemCtxVariables($$)
{
my ($self,$e) = @_;
{
my ($self,$e) = @_;
- if (has_property($e, "skip")) {
+ if (has_property($e, "skip")
or has_property($e, "skip_noinit")
) {
return;
}
return;
}