Browse Source

Update UPoolMining.pas

CopyMemory function not available on Lazarus, use move instead
PascalCoin 6 years ago
parent
commit
f7bf240a97
1 changed files with 1 additions and 1 deletions
  1. 1 1
      src/core/UPoolMining.pas

+ 1 - 1
src/core/UPoolMining.pas

@@ -302,7 +302,7 @@ begin
         if (ms.Size)>0 then begin
           lasti := length(FReceivedBuffer);
           setLength(FReceivedBuffer,length(FReceivedBuffer)+ms.Size);
-          CopyMemory(@FReceivedBuffer[lasti],ms.Memory,ms.Size);
+          move(ms.Memory^,FReceivedBuffer[lasti],ms.Size);
           last_bytes_read := ms.Size;
           ms.Size := 0;
         end;