pidl: cosmetic fix to use the same value everywhere

metze

diff --git a/source/pidl/lib/Parse/Pidl/NDR.pm b/source/pidl/lib/Parse/Pidl/NDR.pm
index 5a34c5f94f612ca3b4b5f89c15b1be5bb8aefa62..98e8f183a2bd11ac5c2a5094ff7fcdf8f4aad653 100644 (file)
--- a/source/pidl/lib/Parse/Pidl/NDR.pm
+++ b/source/pidl/lib/Parse/Pidl/NDR.pm
@@ -623,7 +623,7 @@ sub CheckPointerTypes($$)
 
        foreach my $e (@{$s->{ELEMENTS}}) {
                if ($e->{POINTERS} and not defined(pointer_type($e))) {
-                       $e->{PROPERTIES}->{$default} = 1;
+                       $e->{PROPERTIES}->{$default} = '1';
                }
        }
 }