Plot-ho-matic-0.1.0.0: src/ReadMaybe.hs

{-# OPTIONS_GHC -Wall #-}

module ReadMaybe ( readMaybe ) where

readMaybe :: Read a => String -> Maybe a
readMaybe s = case reads s of
    [(x, "")] -> Just x
    _         -> Nothing