DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

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

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦d277f5352⟧ Ada Source

    Length: 10240 (0x2800)
    Types: Ada Source
    Notes: 03_class, FILE, R1k_Segment, e3_tag, package Fruit_Display_Gourou_Rule_Bundle_5, seg_04bf68

Derivation

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

E3 Source Code



with Fruit_Kbs_5;

package Fruit_Display_Gourou_Rule_Bundle_5 is
    use Fruit_Kbs_5;
    use Fruit_Kbs_5.Kbs;

    procedure Do_Action (For_Rule : Rule_Id; On_Facts : Fact_Collection);

end Fruit_Display_Gourou_Rule_Bundle_5;

E3 Meta Data

    nblk1=9
    nid=2
    hdr6=2
        [0x00] rec0=0b rec1=00 rec2=01 rec3=000
        [0x01] rec0=00 rec1=00 rec2=09 rec3=01e
        [0x02] rec0=15 rec1=00 rec2=06 rec3=008
        [0x03] rec0=00 rec1=00 rec2=08 rec3=04a
        [0x04] rec0=17 rec1=00 rec2=05 rec3=000
        [0x05] rec0=01 rec1=00 rec2=07 rec3=008
        [0x06] rec0=17 rec1=00 rec2=04 rec3=06a
        [0x07] rec0=17 rec1=00 rec2=03 rec3=088
        [0x08] rec0=04 rec1=00 rec2=02 rec3=000
    tail 0x21751b76086925fd1d87e 0x42a00088462063c03
Free Block Chain:
  0x2: 0000  00 03 00 25 80 03 74 29 3b 03 00 00 00 00 00 00  ┆   %  t);       ┆
  0x3: 0000  00 04 03 fc 80 1b 6c 6f 74 5f 4e 61 6d 65 73 20  ┆      lot_Names ┆
  0x4: 0000  00 07 03 fc 80 24 50 6f 73 69 74 69 76 65 5f 41  ┆     $Positive_A┆
  0x7: 0000  00 05 00 07 00 04 20 20 20 20 04 00 00 80 00 01  ┆                ┆
  0x5: 0000  00 08 03 fa 80 08 62 6a 65 63 74 20 3a 3d 08 00  ┆      bject :=  ┆
  0x8: 0000  00 06 00 28 80 25 53 65 61 72 63 68 5f 46 72 65  ┆   ( %Search_Fre┆
  0x6: 0000  00 09 03 fc 80 01 3b 01 00 39 20 20 20 20 4f 6e  ┆      ;  9    On┆
  0x9: 0000  00 00 00 12 80 0f 20 28 4d 6f 64 65 6c 5f 4d 61  ┆       (Model_Ma┆