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 - download
Length: 344 (0x158) Types: TextFile Names: »V«
└─⟦a7d1ea751⟧ Bits:30000550 8mm tape, Rational 1000, !users!projects 94_04_11 └─ ⟦129cab021⟧ »DATA« └─⟦this⟧
with Object; with Scanner; package Trace is procedure On; procedure Off; procedure Display (What : Scanner.Lexeme); procedure Display (What : Scanner.Token); procedure Display (What : Object.Reference); procedure Display (What : String; Always : Boolean := False); private Active : Boolean := False; end Trace;