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 - metrics - download
Index: R T

⟦750c12477⟧ TextFile

    Length: 1381 (0x565)
    Types: TextFile
    Names: »READ_ME«

Derivation

└─⟦180fe333a⟧ Bits:30000405 8mm tape, Rational 1000, SW CATALOG, 10_20_0
└─⟦180fe333a⟧ Bits:30000537 8mm tape, Rational 1000, SW Catalog 10_20_0
    └─⟦5cb1d1d7f⟧ »DATA« 
        └─⟦3b1ee7bd8⟧ 
            └─⟦this⟧ 

TextFile

This package will replace an Ada identifier with a new identifier 
in a set of units.  The replacement will be for identifiers only.
Strings in comments and substrings will be ignored. Overloaded
identifiers will ALL be replaced. For example, if you want to
replace the identifier "Object" with the identifier "Foo" in the
example below:

    Object : Directory_Tools.Object.Handle;
    My_Object : Directory_Tools.Object.Handle;
    Some_String : CONSTANT String := "Object";
    -- This is a test of Replace_Id on Object.
              
the result will be:

    Foo : Directory_Tools.Foo.Handle;
    My_Object : Directory_Tools.Foo.Handle;
    Some_String : CONSTANT String := "Object";
    -- This is a test of Replace_Id on Object.
                                   
Notice that all occurences of Object as an identifier were replaced, but
not in strings, comments, or as part of a longer identifier such as
My_Object.

Two procedures are offered, one that replaces an Id in the compilation
closure of a main program and one that replaces the Id in a set of units
specified by a wildcard naming expression.

Units specified will be demoted to the source state.  The user must then
recompile them.  

THIS PROCEDURE USES THE EDITOR INTERFACE AND RELIES ON THE CURRENT
STATE OF THE EDITOR TO COMPLETE SUCESSFULLY. AS SUCH IT SHOULD BE
ALLOWED TO COMPLETE AND NOT BE INTERRUPTED.