Commit c113789c authored by Camil Staps's avatar Camil Staps 🚀

Merge branch 'fixWindowsReadAllLines' into 'master'

fix order of lines in System.File.readAllLines for Windows

See merge request !243
parents 4af9dfa9 e0adee20
Pipeline #19388 passed with stage
in 3 minutes and 18 seconds
......@@ -8,6 +8,7 @@ import StdList
import StdMisc
import StdString
import Data.Func
import Data.Error
import System.OSError
import System._Pointer
......@@ -60,7 +61,7 @@ readAllLines file
# (result, file) = rec file []
= case result of
Error e = (Error e, file)
Ok lines = (Ok lines, file)
Ok lines = (Ok $ reverse lines, file)
where
rec :: *File [String] -> (!MaybeError FileError [String], *File)
rec file acc
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment