rename readMaybe to readish
a stricter (but also partial) readMaybe is getting added to base
This commit is contained in:
parent
5e172b43c4
commit
ba6088b249
9 changed files with 13 additions and 13 deletions
|
@ -69,8 +69,8 @@ readKey s = if key == Just stubKey then Nothing else key
|
|||
findfields _ v = v
|
||||
|
||||
addbackend k v = Just k { keyBackendName = v }
|
||||
addfield 's' k v = Just k { keySize = readMaybe v }
|
||||
addfield 'm' k v = Just k { keyMtime = readMaybe v }
|
||||
addfield 's' k v = Just k { keySize = readish v }
|
||||
addfield 'm' k v = Just k { keyMtime = readish v }
|
||||
addfield _ _ _ = Nothing
|
||||
|
||||
prop_idempotent_key_read_show :: Key -> Bool
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue