|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T V
Length: 729 (0x2d9)
Types: TextFile
Names: »V«
└─⟦180fe333a⟧ Bits:30000405 8mm tape, Rational 1000, SW CATALOG, 10_20_0
└─⟦180fe333a⟧ Bits:30000537 8mm tape, Rational 1000, SW Catalog 10_20_0
└─⟦5cb1d1d7f⟧ »DATA«
└─⟦3b1ee7bd8⟧
└─⟦this⟧
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;