DataMuseum.dk

top - download

    Length: 621 (0x26d)
    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« 
        └─⟦0281b345a⟧ 
            └─⟦this⟧ 

TextFile

with types;
with system;

package byte_order is

	unknown_byte_order : exception;

	byte_order: types.byte_ordering;

	-- Units from the TDM archive don't get elaborated.  We
	-- need a procedure that we can call explicitly.  This procedure
	-- is called during elaboration of this package, so it only
	-- must be called explicitly if we're getting this package from
	-- an archive.
	procedure set_byte_order;

	-- Low-level byte swap.  See where it's used for examples of
	-- how to use it correctly.
	--
	procedure reverse_bytes(
			source:	system.address;
			dest:	system.address;
			size:	natural
		);

end byte_order