module Exon.Data.RawSegment where data RawSegment = WsSegment String | StringSegment String | ExpSegment String deriving (RawSegment -> RawSegment -> Bool (RawSegment -> RawSegment -> Bool) -> (RawSegment -> RawSegment -> Bool) -> Eq RawSegment forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: RawSegment -> RawSegment -> Bool $c/= :: RawSegment -> RawSegment -> Bool == :: RawSegment -> RawSegment -> Bool $c== :: RawSegment -> RawSegment -> Bool Eq, Int -> RawSegment -> ShowS [RawSegment] -> ShowS RawSegment -> String (Int -> RawSegment -> ShowS) -> (RawSegment -> String) -> ([RawSegment] -> ShowS) -> Show RawSegment forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [RawSegment] -> ShowS $cshowList :: [RawSegment] -> ShowS show :: RawSegment -> String $cshow :: RawSegment -> String showsPrec :: Int -> RawSegment -> ShowS $cshowsPrec :: Int -> RawSegment -> ShowS Show)