|
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: 756 (0x2f4)
Types: TextFile
Names: »V«
└─⟦25882cbde⟧ Bits:30000536 8mm tape, Rational 1000, RCI_RS6000_AIX_IBM 2_0_2
└─ ⟦b8efda8ac⟧ »DATA«
└─⟦7061b4ee8⟧
└─⟦dea849e77⟧
└─⟦this⟧
package Gl_System_Types is
type Float32 is new Float;
for Float32'Size use 32;
type Float64 is new Long_Float;
for Float64'Size use 64;
type Int16 is range -2 ** 15 .. 2 ** 15 - 1;
for Int16'Size use 16;
type Int32 is range -2 ** 31 .. 2 ** 31 - 1;
for Int32'Size use 32;
type Int8 is range -2 ** 7 .. 2 ** 7 - 1;
for Int8'Size use 8;
type Long is range -2 ** 31 .. 2 ** 31 - 1;
for Long'Size use 32;
type Uint16 is range 0 .. 2 ** 16 - 1;
for Uint16'Size use 16;
type Uint32 is range -2 ** 31 .. 2 ** 31 - 1;
for Uint32'Size use 32;
type Uint8 is range 0 .. 2 ** 8 - 1;
for Uint8'Size use 8;
type Ushort is range 0 .. 2 ** 16 - 1;
for Ushort'Size use 16;
end Gl_System_Types;