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 - downloadIndex: ┃ T V ┃
Length: 987 (0x3db) Types: TextFile Names: »V«
└─⟦db1c56801⟧ Bits:30000748 8mm tape, Rational 1000, TESTMATE 2_2_0 └─ ⟦866d14df1⟧ »DATA« └─⟦97c804b2f⟧ └─⟦this⟧
with System; with Access_String; with Subprog_Coverage_Map; package Unit_Cover_Map is type Object is private; function Constructor (Heap : System.Segment) return Object; procedure Destructor (Of_The_Obj : in out Object); function Equal (L, R : Object) return Boolean; function Eval (In_The_Map : Object; With_Domain : Access_String.Object) return Subprog_Coverage_Map.Object; procedure Find (In_The_Map : Object; The_Domain : Access_String.Object; Yielding_The_Range : in out Subprog_Coverage_Map.Object; With_Success : out Boolean); type Iterator is private; function Is_Empty (The_Map : Object) return Boolean; procedure Init (Iter : out Iterator; The_Map : Object); procedure Next (Iter : in out Iterator); function Value (Iter : Iterator) return Access_String.Object; function Done (Iter : Iterator) return Boolean; end Unit_Cover_Map;