Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/Numeric/ReadOct.hs
module Numeric where import IsOctDigit import DigitToInt import ReadInt readOct :: (Integral a) => ReadS a readOct = readInt 8 isOctDigit digitToInt
