fixes sysio/readChar regression

This commit is contained in:
Andreas Rumpf
2016-06-13 12:23:31 +02:00
parent 82ccb09b61
commit 68d1240012

View File

@@ -98,7 +98,7 @@ const
BufSize = 4000
proc close*(f: File) = discard c_fclose(f)
proc readChar*(f: File): char = result = cast[char](c_fgetc(f))
proc readChar*(f: File): char = result = char(c_fgetc(f))
proc flushFile*(f: File) = discard c_fflush(f)
proc getFileHandle*(f: File): FileHandle = c_fileno(f)