more state
This commit is contained in:
parent
2ac47a3a59
commit
20acda0423
5 changed files with 12 additions and 14 deletions
4
Types.hs
4
Types.hs
|
@ -26,9 +26,9 @@ data Backend = Backend {
|
|||
-- stores a file's contents to a key
|
||||
storeFileKey :: State -> FilePath -> Key -> IO Bool,
|
||||
-- retrieves a key's contents to a file
|
||||
retrieveKeyFile :: Key -> FilePath -> IO Bool,
|
||||
retrieveKeyFile :: State -> Key -> FilePath -> IO Bool,
|
||||
-- removes a key
|
||||
removeKey :: Key -> IO Bool
|
||||
removeKey :: State -> Key -> IO Bool
|
||||
}
|
||||
|
||||
instance Show Backend where
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue