Ver Fonte

* Write byte dyn array

Michaël Van Canneyt há 4 meses atrás
pai
commit
98f6c64f82
1 ficheiros alterados com 2 adições e 2 exclusões
  1. 2 2
      compiler/wpobase.pas

+ 2 - 2
compiler/wpobase.pas

@@ -822,7 +822,7 @@ implementation
       calledentries:=tbitset.create_bytesize(len);
       if (len <> calledentries.datasize) then
         internalerror(2009060301);
-      ppufile.readdata(calledentries.data^,len);
+      ppufile.readdata(calledentries.data);
     end;
 
 
@@ -837,7 +837,7 @@ implementation
     begin
       ppufile.putderef(objdefderef);
       ppufile.putlongint(calledentries.datasize);
-      ppufile.putdata(calledentries.data^,calledentries.datasize);
+      ppufile.putdata(calledentries.data);
     end;