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 - 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;