-- | Convert a 'String' to an 'Int', any errors are silently ignored.
strRead :: Exp String -> Exp Int
strRead = fmap (Value . fromValue)
strRead :: Exp String -> Exp Int
strRead = fmap (Value . fromValue)
strRead = fmap (Value . fromValue)