Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/PackedString/Head.hs
module NHC.PackedString where import Prelude hiding(head,Ix(..)) import DPackedString import Index head :: PackedString -> Char head p = index p 0
