mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-12-29 22:51:51 +03:00
10 lines
208 B
Idris
10 lines
208 B
Idris
|
import System.File
|
||
|
|
||
|
main : IO ()
|
||
|
main = do
|
||
|
Right f <- openFile "sampleFile.txt" Read
|
||
|
| Left err => printLn err
|
||
|
Right contents <- fRead f
|
||
|
| Left err => printLn err
|
||
|
printLn contents
|