jyapayne/Nim
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Merge pull request #2230 from Archs/devel

Browse source 
streams.ssWriteData: Call setLen only when new data truly increases the underlying string buffer
This commit is contained in:
Andreas Rumpf 2015-03-04 03:08:38 +01:00
commit b1656f2db4
1 changed files with 6 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lib/pure/streams.nim
View file

@ -224,10 +224,12 @@ proc ssReadData(s: Stream, buffer: pointer, bufLen: int): int =
proc ssWriteData(s: Stream, buffer: pointer, bufLen: int) = proc ssWriteData(s: Stream, buffer: pointer, bufLen: int) =
var s = StringStream(s) var s = StringStream(s)
if bufLen > 0: if bufLen <= 0:
setLen(s.data, s.data.len + bufLen) return
copyMem(addr(s.data[s.pos]), buffer, bufLen) if s.pos + bufLen > s.data.len:
inc(s.pos, bufLen) setLen(s.data, s.pos + bufLen)
copyMem(addr(s.data[s.pos]), buffer, bufLen)
inc(s.pos, bufLen)
proc ssClose(s: Stream) = proc ssClose(s: Stream) =
var s = StringStream(s) var s = StringStream(s)