Sfoglia il codice sorgente

* Correct write at

Michael Van Canneyt 1 anno fa
parent
commit
767c226db7
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  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;