|
|
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: 838 (0x346)
Types: TextFile
Names: »V«
└─⟦516dceb10⟧ Bits:30000751 8mm tape, Rational 1000, RCI_VADS
└─⟦9a14c9417⟧ »DATA«
└─⟦this⟧
with Directory;
with Profile;
package Rcf_Switch_Implementation is
-- Functions that look up certain library switches in the RCI views.
Host_Only_Switch : constant String := "Host_Only";
Trace_Command_Output_Switch : constant String := "Trace_Command_Output";
function Value (Name : String; Switch_File : Directory.Version)
return Boolean;
function Is_Host_Only (For_View : Directory.Object) return Boolean;
-- Returns True if the "Host_Only" switch is set to True for the given
-- view.
function Trace_On (For_View : Directory.Object) return Boolean;
-- Returns True if the "Trace_Command_Output" switch is turned on for the
-- given view.
function Value
(Name : String; Switch_File : Directory.Object) return String;
end Rcf_Switch_Implementation;