DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦725388e37⟧ TextFile

    Length: 912 (0x390)
    Types: TextFile
    Notes: R1k Text-file segment

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦46e915727⟧ 
            └─⟦this⟧ 

TextFile

with target;
with system;
with machine_types;
with unsigned_types;
with unchecked_conversion;

with file_support;
with os_files;

package target_types is


	-- for use with byte addressable targets

	subtype target_sum is tiny_integer;
	subtype target_int is integer;
	subtype target_unsigned is unsigned_types.unsigned_integer;
	subtype target_short is short_integer;
	subtype target_word is machine_types.word;
	subtype target_ch is character;
	subtype target_bool is boolean;
	subtype target_style is os_files.file_styles;
	subtype target_mode is file_support.file_mode;
	subtype target_fd is os_files.file_descriptor;

	subtype target_addr_rep is target.addr_rep;
	subtype target_opcode_rep is target.opcode_rep;

	type target_string is array(natural range <>) of target_ch;
	type target_int_array is array(integer range <>) of target_int;
	subtype target_file_id is target_int_array(1..2);

end target_types