Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/PreludeText/Read_Int.hs
module Prelude(Read(..)) where --import Numeric(readSigned,readDec) instance Read Int where readsPrec p r = map (\(i,t)-> (fromInteger i, t)) (readsPrec p r)
