Ver código fonte

* Correct write at

Michael Van Canneyt 1 ano atrás
pai
commit
767c226db7
1 arquivos alterados com 1 adições e 1 exclusões
  1. 1 1
      packages/wasi/src/wasizenfs.pas

+ 1 - 1
packages/wasi/src/wasizenfs.pas

@@ -296,7 +296,7 @@ begin
   try
     DS:=TJSDataView.New(Data.buffer);
     if atPos<>-1 then
-      Written:=ZenFS.writeSync(fd,DS,atPos)
+      Written:=ZenFS.writeSync(fd,DS,0,Data.byteLength,atPos)
     else
       Written:=ZenFS.writeSync(fd,DS,0,Data.byteLength);
     Result:=resOK;