Avoid range check error inside ppudump.

  Change the type of all fields set by a call
  to getasizeint or getaint to int64 to avoid range check errors

compiler/utils/ppuutils/ppuout.pp

@@ -281,7 +281,7 @@ type
     Options: TPpuObjOptions;
     IID: string;
     HelperParent: TPpuRef;
-    Size: integer;
+    Size: int64;
     constructor Create(AParent: TPpuContainerDef); override;
     destructor Destroy; override;
     function CanWrite: boolean; override;
@@ -348,8 +348,8 @@ type
   protected
     procedure BeforeWriteItems(Output: TPpuOutput); override;
   public
-    ElLow, ElHigh: integer;
-    Size: byte;
+    ElLow, ElHigh: int64;
+    Size: int64;
     CopyFrom: TPpuRef;
     constructor Create(AParent: TPpuContainerDef); override;
     destructor Destroy; override;
@@ -361,8 +361,8 @@ type
     procedure WriteDef(Output: TPpuOutput); override;
   public
     ElType: TPpuRef;
-    SetBase, SetLow, SetMax: integer;
-    Size: byte;
+    SetBase, SetLow, SetMax: int64;
+    Size: int64;
     constructor Create(AParent: TPpuContainerDef); override;
     destructor Destroy; override;
   end;
@@ -409,7 +409,7 @@ type
     procedure WriteDef(Output: TPpuOutput); override;
   public
     StrType: TPpuStrType;
-    Len: integer;
+    Len: int64;
     constructor Create(AParent: TPpuContainerDef); override;
   end;