DataMuseum.dk

top - download

    Length: 602 (0x25a)
    Types: TextFile
    Notes: R1k Text-file segment

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

TextFile

with machine_types; use machine_types;
with system;

package body transport_byte_order is





	function to_local_integer(x: transport_integer) return integer is
	begin
		return integer(x);
	end to_local_integer;

	function to_local_word(x: transport_word) return word is
	begin
		return word(x);
	end to_local_word;

	function to_transport_integer(x: integer) return transport_integer is
	begin
		return transport_integer(x);
	end to_transport_integer;

	function to_transport_word(x: word) return transport_word is
	begin
		return transport_word(x);
	end to_transport_word;

end transport_byte_order