DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400 Tapes

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 Tapes

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - download

⟦751f2bda9⟧ TextFile

    Length: 500 (0x1f4)
    Types: TextFile
    Names: »V«

Derivation

└─⟦516dceb10⟧ Bits:30000751 8mm tape, Rational 1000, RCI_VADS
    └─ ⟦9a14c9417⟧ »DATA« 
        └─⟦this⟧

TextFile


-- types and constants describing the target.

PACKAGE Machine_Types IS

   PRAGMA Suppress (All_Checks);
   PRAGMA Suppress (Exception_Tables);
   PRAGMA Not_Elaborated;

   ----------------------------------------------
   -- basic machine representations
   -- we read/write bytes/words on every machine.
   ----------------------------------------------
   TYPE Byte IS RANGE 0 .. 16#ff#;
   FOR Byte'Size USE 8;

   TYPE Word IS RANGE 0 .. 16#ffff#;
   FOR Word'Size USE 16;

END Machine_Types;