Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/Numeric/ReadDec.hs
module Numeric where import IsDigit import DigitToInt import ReadInt readDec :: (Integral a) => ReadS a readDec = readInt 10 isDigit digitToInt