|
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: 7358 (0x1cbe)
Types: TextFile
Names: »V«
└─⟦afbc8121e⟧ Bits:30000532 8mm tape, Rational 1000, MC68020_OS2000 7_2_2
└─ ⟦77aa8350c⟧ »DATA«
└─⟦f794ecd1d⟧
└─⟦this⟧
with Cdf_Definitions;
with Simple_Status;
with M68k_Definitions;
generic
with procedure Set_Break (Id : M68k_Definitions.Longword;
Class : M68k_Definitions.Break_Class;
Pc : M68k_Definitions.Address;
Ref_Count : M68k_Definitions.Longword;
Temporary : Boolean;
Task_Name : M68k_Definitions.Task_Id;
Target_Status : in out Simple_Status.Condition);
with procedure Break_Trip_Count
(Id : M68k_Definitions.Longword;
Count : out M68k_Definitions.Longword;
Target_Status : in out Simple_Status.Condition);
with procedure Clear_Break (Id : M68k_Definitions.Longword;
Target_Status : in out Simple_Status.Condition);
with procedure Instruction_Step
(Task_Name : M68k_Definitions.Task_Id;
Step_Count : M68k_Definitions.Longword;
Target_Status : in out Simple_Status.Condition);
with procedure Run (Task_Name : M68k_Definitions.Task_Id;
Run_Type : M68k_Definitions.Run_Type;
Step_Count : M68k_Definitions.Longword;
Next_Sequential_Stmt_Addr : M68k_Definitions.Address;
Target_Status : in out Simple_Status.Condition);
with procedure Statement_Step
(Task_Name : M68k_Definitions.Task_Id;
Step_Count : M68k_Definitions.Longword;
Next_Sequential_Stmt_Addr : M68k_Definitions.Address;
Target_Status : in out Simple_Status.Condition);
with procedure Instruction_Step_Count
(Task_Name : M68k_Definitions.Task_Id;
Step_Count : out M68k_Definitions.Longword;
Target_Status : in out Simple_Status.Condition);
with procedure Clear_Stepping
(Task_Name : M68k_Definitions.Task_Id;
Target_Status : in out Simple_Status.Condition);
with procedure Execute (Task_Name : M68k_Definitions.Task_Id;
Target_Status : in out Simple_Status.Condition);
with procedure Stop_Task (Task_Name : M68k_Definitions.Task_Id;
Target_Status : in out Simple_Status.Condition);
with procedure Read_Memory (Source : M68k_Definitions.Address;
Address_Space : M68k_Definitions.Address_Kind;
In_Segmented_Heap : Boolean;
Byte_Count : in out Natural;
Data : out M68k_Definitions.Byte_String;
Target_Status : in out Simple_Status.Condition);
with procedure Write_Memory
(Destination : M68k_Definitions.Address;
Address_Space : M68k_Definitions.Address_Kind;
In_Segmented_Heap : Boolean;
Byte_Count : in out Natural;
Data : M68k_Definitions.Byte_String;
Target_Status : in out Simple_Status.Condition);
with procedure Read_Registers
(Frame_Number : Natural;
Regs : out M68k_Definitions.Register_Array;
Task_Name : M68k_Definitions.Task_Id;
Target_Status : in out Simple_Status.Condition);
with procedure Write_Register
(Frame_Number : Natural;
Reg_Num : M68k_Definitions.Register_Number;
Task_Name : M68k_Definitions.Task_Id;
Data : M68k_Definitions.Byte_String;
Target_Status : in out Simple_Status.Condition);
with procedure Convert_To_Absolute
(Relative : M68k_Definitions.Address;
From_Component : M68k_Definitions.Address;
Result : out M68k_Definitions.Address;
Target_Status : in out Simple_Status.Condition);
with procedure Convert_To_Relative
(Absolute : M68k_Definitions.Address;
Result : out M68k_Definitions.Address;
Target_Status : in out Simple_Status.Condition);
with procedure Connect_To_Processor
(Remote_Machine : String;
Version : out String;
Target_Status : in out Simple_Status.Condition);
with procedure Reset;
with procedure Load (Do_Spawn : Boolean;
R1000_Path_Name : String;
Target_Path_Name : String;
Remote_Directory : String;
Pid_Of_Program : M68k_Definitions.Word;
Options : String;
Program_Code : out M68k_Definitions.Address;
Program_Data : out M68k_Definitions.Address;
Start_Offset : out M68k_Definitions.Address;
Runtime_Code : out M68k_Definitions.Address;
Runtime_Data : out M68k_Definitions.Address;
Misc_Info : out M68k_Definitions.Byte_String;
Version : out M68k_Definitions.Longword;
Target_Status : in out Simple_Status.Condition);
with procedure Disconnect (Force : Boolean;
Target_Status : in out Simple_Status.Condition);
with procedure Stop_Debugging
(Process_Id : M68k_Definitions.Task_Id;
Closure : M68k_Definitions.Terminate_Set;
Kill_Process : Boolean;
Target_Status : in out Simple_Status.Condition);
with procedure Set_Flag (Flag : String;
Flag_Value : Integer;
Target_Status : in out Simple_Status.Condition);
with function Target_Request (Options : String) return String;
with function Invoke_Special_Image_Function
(Call_Descriptor : Cdf_Definitions.Call_Descriptor)
return String;
with function Wait_For_Next_Event return M68k_Definitions.Target_Event;
package Target_Interface_Generic is
procedure Initiate_Debugging (Main_Unit : String := "<SELECTION>";
Options : String := "";
Spawn_Job : Boolean := True;
Target_Key : String := "");
end Target_Interface_Generic;