mirrors/Nim
1
0
Fork 0
mirror of https://github.com/nim-lang/Nim.git synced 2026-04-18 21:40:32 +00:00
Code Issues Packages Projects Releases Wiki Activity

A file stream now makes sure to only close its file descriptor once.

Browse Source
This commit is contained in:
Dominik Picheta
2013-04-07 13:40:01 +01:00
parent f9d4e39a12
commit d26e488316
1 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
lib/pure/streams.nim
View File

@@ -238,7 +238,10 @@ type
TFileStream* = object of TStream
f: TFile
proc fsClose(s: PStream) = close(PFileStream(s).f)
proc fsClose(s: PStream) =
if PFileStream(s).f != nil:
close(PFileStream(s).f)
PFileStream(s).f = nil
proc fsFlush(s: PStream) = flushFile(PFileStream(s).f)
proc fsAtEnd(s: PStream): bool = return EndOfFile(PFileStream(s).f)
proc fsSetPosition(s: PStream, pos: int) = setFilePos(PFileStream(s).f, pos)