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
Index: ┃ A T ┃

⟦d394aa0d5⟧ TextFile

    Length: 2161 (0x871)
    Types: TextFile
    Names: »ADA_RUNTIME_MODULE«

Derivation

└─⟦afbc8121e⟧ Bits:30000532 8mm tape, Rational 1000, MC68020_OS2000 7_2_2
    └─ ⟦77aa8350c⟧ »DATA« 
        └─⟦f794ecd1d⟧ 
            └─⟦24d1ddd49⟧ 
                └─⟦this⟧

TextFile

program "Ada_Runtime_Module" is

    link "^^common.system_implementation_object";
    link "^^common.predefined_exceptions_object";
    link "^^common.runtime_data_object";

    link "^^shared.exceptions.exceptions'spec.<obj>";
    link "^^shared.shared_code_generics.shared_code_generic_support'spec.<obj>";
    link "^^shared.shared_code_generics.target'spec.<obj>";
    link "^^shared.[?;~tasking.ipc_dummy]'body.<obj>";
    link "^^shared.non_ada_source.@'c(obj_code)";

    link "^^shared.peab_source.peab_interprogram_communication_object";

    collection os2000_header    is (os2000_module_header);
    collection code             is (ada_runtime_code, predefined_code, ada_code);
    collection constant_data    is (ada_runtime_const, ada_const);
    collection os2000_trailer   is (os2000_module_crc);

    collection initial_values   is (predefined_exception_values,ada_init_data,ada_init_values);

    collection data             is (ada_runtime_data, predefined_exceptions, ada_data);

    collection DEBUG_HDR_CU     is (DEBUG_HDR_CU);
    collection DEBUG_BODY       is (DEBUG_BODY);

    segment shared is
    
        memory bounds are (0:16#FFF_FFFF#);
        
        place os2000_header;
        place code;
        place constant_data;
        place os2000_trailer;

    end;

    segment initial_values is
    
        memory bounds are (0:16#FFF_FFFF#);
        
        place initial_values;

        options (suppress);

    end;

    segment unshared is
    
        memory bounds are (0:16#FFF_FFFF#);
        
        place data;

        options (suppress);

    end;

    segment debug_hdrs is
         memory bounds are (0:16#FFF_FFFF#);

         place DEBUG_HDR_CU;
         
    end;

    segment debug_body is
         memory bounds are (0:16#FFF_FFFF#);

         place DEBUG_BODY;
         
    end;
    
    retain_dead_code from module "os2000_module";
    retain_dead_code from module "runtime_entry_point_table";
    retain_dead_code from module "predefined_exceptions";
    retain_dead_code from module "runtime_data";
    retain_dead_code from segment debug_hdrs;
    retain_dead_code from segment debug_body;

end;