* ppudump: Fixed json and xml output of inline types in array declaration.

git-svn-id: trunk@26277 -

compiler/utils/ppuutils/ppudump.pp

@@ -2824,7 +2824,7 @@ begin
              writeln([space,'            Range : ',arrdef.RangeLow,' to ',arrdef.RangeHigh]);
              write  ([space,'          Options : ']);
              readarraydefoptions(arrdef);
-             readsymtable('symbols');
+             readsymtable('symbols', arrdef);
            end;
 
          ibprocdef :

compiler/utils/ppuutils/ppuout.pp

@@ -319,7 +319,7 @@ type
   TPpuArrayOptions = set of TPpuArrayOption;
 
   { TPpuArrayDef }
-  TPpuArrayDef = class(TPpuDef)
+  TPpuArrayDef = class(TPpuContainerDef)
   protected
     procedure WriteDef(Output: TPpuOutput); override;
   public
@@ -760,6 +760,7 @@ end;
 constructor TPpuArrayDef.Create(AParent: TPpuContainerDef);
 begin
   inherited Create(AParent);
+  ItemsName:='Types';
   DefType:=dtArray;
   ElType:=TPpuRef.Create;
   RangeType:=TPpuRef.Create;