Browse Source

* Correct write at

Michael Van Canneyt 1 năm trước cách đây
mục cha
commit
767c226db7
1 tập tin đã thay đổi với 1 bổ sung1 xóa
  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;