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: T V

⟦19c9307a4⟧ TextFile

    Length: 634 (0x27a)
    Types: TextFile
    Names: »V«

Derivation

└─⟦2f6cfab89⟧ Bits:30000547 8mm tape, Rational 1000, !projects 94-01-04
    └─⟦d65440be7⟧ »DATA« 
        └─⟦this⟧

TextFile

with Object;
with Message;
with Argument;

package String_Classe is

    Id_String_Overflow : exception;
    String_Class_Full : exception;
    String_Large_Overflow : exception;

    function Create (Name : Message.Tiny_String) return Object.Reference;

    procedure Remove (The_Object : Object.Reference);
    function Send (To_Object : Object.Reference;
                   The_Message : Message.Selector;
                   With_Arguments : Argument.List) return Object.Reference;

    function Send (To_Object : Object.Reference;
                   The_Message : Message.Tiny_String) return Object.Reference;


end String_Classe;