|
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: 1217 (0x4c1)
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⟧
----------------------------------------------------------------------------
--
-- Abstract : This package controls calls to the HELP_UTILITY package.
-- : It also handles the Help output to the screen.
-- : The exceptions are propagated up to the calling routine.
--
----------------------------------------------------------------------------
package Help is
subtype Level_Type is String (1 .. 10);
Merge_Help : constant Level_Type := "HELP MERGE"; -- call is made
-- from Merge
List_Help : constant Level_Type := "HELP LIST "; -- call is made
-- from List
Spell_Help : constant Level_Type := "HELP SPELL"; -- call is made
-- from Spell
Help_Help : constant Level_Type := "HELP "; -- call from
-- top-level of Speller
Quit_Help : constant Level_Type := "HELP QUIT "; -- call is made
-- from Quit
procedure Help_Screen (Level : Level_Type);
-- exceptions
Help_Open_Error : exception; -- HELP_FILE.INI cannot be opened
Help_File_Error : exception; -- HELP_FILE.INI does not exist
Help_Format_Error : exception; -- HELP_FILE.INI has been modified
-- and the format is illegal
end Help;