From a7d7542dc646a5fd124ef71e71ce260889f1701b Mon Sep 17 00:00:00 2001 From: Camil Staps Date: Tue, 2 Feb 2016 19:24:50 +0100 Subject: Moved to 1415 directory --- 1415/files/practicum/SimpleFileIO.dcl | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 1415/files/practicum/SimpleFileIO.dcl (limited to '1415/files/practicum/SimpleFileIO.dcl') diff --git a/1415/files/practicum/SimpleFileIO.dcl b/1415/files/practicum/SimpleFileIO.dcl new file mode 100644 index 0000000..30ef941 --- /dev/null +++ b/1415/files/practicum/SimpleFileIO.dcl @@ -0,0 +1,14 @@ +definition module SimpleFileIO + +import StdFile, StdOverloaded, StdMaybe + +// 1. +readFile :: String *env -> (Maybe String, *env) | FileSystem env +writeFile :: String String *env -> (Bool, *env) | FileSystem env + +// 2. +readLines :: String *env -> (Maybe [String],*env) | FileSystem env +writeLines :: String [String] *env -> (Bool, *env) | FileSystem env + +// 3. +mapFile :: String String (a -> b) *env -> (Bool, *env) | FileSystem env & ... a & ... b -- cgit v1.2.3