module Data.Char.Properties.Misc
(
        module Data.Char.Properties.MiscData,
        module Data.Char.Properties.Derivation,
        module Data.Char.Properties.Misc
) where
{
        import Data.Char.Properties.MiscData;
        import Data.Char.Properties.GeneralCategory;
        import Data.Char.Properties.Derivation;
        import Prelude;

        -- | Returns true if the general category is Lt.
        ;
        isTitlecase :: Char -> Bool;
        isTitlecase c = getGeneralCategory c == GcLt;

        -- Note: this is not defined by Unicode.
        -- Also, a single line break can be an 0D 0A sequence.
        isLineBreak :: Char -> Bool;
        isLineBreak '\x000A' = True;    -- LINE FEED
        isLineBreak '\x000B' = True;    -- VERTICAL TABULATION ?
        isLineBreak '\x000C' = True;    -- FORM FEED
        isLineBreak '\x000D' = True;    -- CARRIAGE RETURN
        isLineBreak '\x2028' = True;    -- LINE SEPARATOR
        isLineBreak '\x2029' = True;    -- PARAGRAPH SEPARATOR
        isLineBreak _ = False;
}
