Explorar el Código

Updated for mem function changes.

woollybah hace 8 años
padre
commit
874bbd9bca
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  1. 1 1
      freeprocess.mod/freeprocess.bmx

+ 1 - 1
freeprocess.mod/freeprocess.bmx

@@ -110,7 +110,7 @@ Type TPipeStream Extends TStream
 				If p1>p0 line$=String.FromBytes(Varptr readbuffer[p0],p1-p0)
 				n:+1
 				bufferpos:-n
-				If bufferpos MemMove(readbuffer,Varptr readbuffer[n],bufferpos)
+				If bufferpos MemMove(readbuffer,Varptr readbuffer[n],Size_T(bufferpos))
 				Return line$
 			EndIf
 		Next