package Host_Dependencies is
    --| Simple data types and constants involving the Host Machine.

    -- Types and Objects --

    Maxcolumn : constant := 250;
    subtype Source_Column is Natural range 0 .. Maxcolumn;
    Maxline : constant := 100000;  -- This is completely arbitrary
    subtype Source_Line is Natural range 0 .. Maxline;

    -- Operations --

    function Findtabcolumn ( --| returns source column a tab is in
                            Incolumn : in Source_Column
                            --| source column before tab
                            ) return Source_Column;

    --| Effects

    --| This subprogram implements the tab positioning strategy
    --| of the Host system.

end Host_Dependencies;