|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Types: Ada Source
Notes: 03_class, FILE, R1k_Segment, e3_tag, seg_03bdae
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
-- Copyright 1987, 1988 Verdix Corporation ---------------------------------------------------------------------- -- This package provides the interface to the ada.lib info directive -- parameters placed in foo.o by a.ld. -- -- Parameter constants are derived from rts_names.h in vax.fe project. ---------------------------------------------------------------------- PACKAGE V_Ada_Info IS PRAGMA Suppress (All_Checks); PRAGMA Suppress (Exception_Tables); PRAGMA Not_Elaborated; -- -- Processor types (TARGET info) -- Tp_Self : CONSTANT := 0; Tp_Mc68000 : CONSTANT := 1; Tp_Mc68010 : CONSTANT := 2; Tp_Mc68020 : CONSTANT := 3; Tp_Mc68030 : CONSTANT := 4; Tp_Mc68040 : CONSTANT := 5; Tp_I386 : CONSTANT := 6; Tp_Am29000 : CONSTANT := 7; Tp_Cpu32 : CONSTANT := 8; Tp_M1750a : CONSTANT := 9; Tp_Ns32032 : CONSTANT := 10; Processor_Type : Integer; PRAGMA Interface_Name (Processor_Type, "PROCESSOR_TYPE"); -- -- Floating point support types (FLOATING_POINT_SUPPORT info) -- Fp_Native : CONSTANT := 0; Fp_Software : CONSTANT := 1; Fp_Mc68881 : CONSTANT := 2; Fp_Mc68882 : CONSTANT := 3; Fp_80287 : CONSTANT := 4; Fp_80387 : CONSTANT := 5; Fp_Weitek : CONSTANT := 6; Fp_Am29027 : CONSTANT := 7; Floating_Point_Support : Integer; PRAGMA Interface_Name (Floating_Point_Support, "FLOATING_POINT_SUPPORT"); END V_Ada_Info;
nblk1=2
nid=0
hdr6=4
[0x00] rec0=20 rec1=00 rec2=01 rec3=058
[0x01] rec0=12 rec1=00 rec2=02 rec3=000
tail 0x21739b82c856574442d4d 0x489e0066482863c01