package Loc_Blank_Lines is

    --=====================================================================
    -- This package contains definition of LOC blank line count and an   ==
    -- operation used to change an object of type Count.                 ==
    --=====================================================================

    type Count is new Natural;
    procedure Change (Number_Of_Blank_Lines : in out Count;
                      With_Delta : in Positive := 1);

end Loc_Blank_Lines;