|
|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T V
Length: 1126 (0x466)
Types: TextFile
Names: »V«
└─⟦2f6cfab89⟧ Bits:30000547 8mm tape, Rational 1000, !projects 94-01-04
└─⟦d65440be7⟧ »DATA«
└─⟦this⟧
package Token is
type Object is (L_2points, L_Virgule, L_Ouvrante, L_Fermante,
L_Inf, L_Sup, L_Egal, L_Pas_Egal, L_Inf_Ou_Egal,
L_Sup_Ou_Egal, L_Point, L_Plus, L_Moins, L_Mult, L_Div,
L_Crochet_Ouvrant, L_Crochet_Fermant, L_Affect, L_Acteur,
L_Activer, L_Appel_Effet, L_Attendre, L_Binaire,
L_Changer, L_Collection, L_Constitue, L_Dans, L_Debut,
L_Desact, L_Discret, L_Effet, L_Est, L_Evoluer, L_Exp,
L_Faire, L_Fin, L_Fois, L_Fugitif, L_Lancer_Scene,
L_Materiel, L_Parmi, L_Pour, L_Puis, L_Repeter, L_Repres,
L_Scene, L_Spectacle, L_Station, L_Tantque, L_Temporel,
L_Theatre, L_Id, L_Nbr, L_Adresse, L_Unk, L_Eof);
type Expression_Token is (L_Plus, L_Moins, L_Div, L_Mult, L_Nbr, L_Id);
type Action_Token is (L_Activer, L_Desact, L_Changer,
L_Evoluer, L_Id, L_Nbr);
One_Operator : constant Expression_Token := L_Plus;
function Value (S : String) return Token.Object;
end Token;