|
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: 645 (0x285)
Types: TextFile
Names: »V«
└─⟦d10a02448⟧ Bits:30000409 8mm tape, Rational 1000, ENVIRONMENT, D_12_7_3
└─ ⟦fc9b38f02⟧ »DATA«
└─⟦9b46a407a⟧
└─⟦12c68c704⟧
└─⟦this⟧
└─⟦5f3412b64⟧ Bits:30000745 8mm tape, Rational 1000, ENVIRONMENT 12_6_5 TOOLS
└─ ⟦91c658230⟧ »DATA«
└─⟦458657fb6⟧
└─⟦220843204⟧
└─⟦this⟧
with Byte_Defs;
with Text_Io;
package Byte_String_Io is
pragma Subsystem (Input_Output, Private_Part => Closed);
pragma Module_Name (4, 3536);
subtype Byte_String is Byte_Defs.Byte_String;
subtype File_Type is Text_Io.File_Type;
function Image (Item : Byte_String) return String;
procedure Put (Item : Byte_String);
procedure Put (File : File_Type; Item : Byte_String);
procedure Get (Item : out Byte_String);
procedure Get (File : File_Type; Item : out Byte_String);
function Get return Byte_String;
function Get (File : File_Type) return Byte_String;
end Byte_String_Io;