diff options
author | Jelmer Vernooij <jelmer@samba.org> | 2005-06-13 22:22:51 +0000 |
---|---|---|
committer | Gerald (Jerry) Carter <jerry@samba.org> | 2007-10-10 13:18:07 -0500 |
commit | c420c5a4c4bc2185f123058027f8328ade0d0a4e (patch) | |
tree | b47081275005af23d7ad962063d83cf4da2987fc /source4/build/pidl/ndr_parser.pm | |
parent | 9ef145424afe44e6c0acccf95faad357868a46f3 (diff) | |
download | samba-c420c5a4c4bc2185f123058027f8328ade0d0a4e.tar.gz samba-c420c5a4c4bc2185f123058027f8328ade0d0a4e.tar.bz2 samba-c420c5a4c4bc2185f123058027f8328ade0d0a4e.zip |
r7552: Use ParseExpr() for [value] attributes; allows
us somewhat cleaner IDL.
(This used to be commit b7b01bccd101654d1f5ec83cba9dea7e9431d6ce)
Diffstat (limited to 'source4/build/pidl/ndr_parser.pm')
-rw-r--r-- | source4/build/pidl/ndr_parser.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/source4/build/pidl/ndr_parser.pm b/source4/build/pidl/ndr_parser.pm index 0dd1289d80..7beefbf95d 100644 --- a/source4/build/pidl/ndr_parser.pm +++ b/source4/build/pidl/ndr_parser.pm @@ -704,7 +704,7 @@ sub ParseElementPush($$$$$$) start_flags($e); if (my $value = util::has_property($e, "value")) { - pidl "$var_name = $value;"; + pidl "$var_name = " . ParseExpr($value, $env) . ";"; } ParseElementPushLevel($e, $e->{LEVELS}[0], $ndr, $var_name, $env, $primitives, $deferred); @@ -748,7 +748,7 @@ sub ParseElementPrint($$$) if (my $value = util::has_property($e, "value")) { pidl "if (ndr->flags & LIBNDR_PRINT_SET_VALUES) {"; - pidl "\t$var_name = $value;"; + pidl "\t$var_name = " . ParseExpr($value,$env) . ";"; pidl "}"; } |