fisheye/src/SortedIndexTable.i3


 Copyright (C) 1992, Digital Equipment Corporation                         
 All rights reserved.                                                      
 See the file COPYRIGHT for a full description.                            
                                                                           
 Last modified on Tue Jun 16 16:46:21 PDT 1992 by muller                   

INTERFACE SortedIndexTable;

IMPORT SortedHashTable;

TYPE

  Item = RECORD key: REAL; data: INTEGER; END;
  T = REF RECORD number: INTEGER; items: REF ARRAY OF Item; END;

PROCEDURE New(size: INTEGER): T;

PROCEDURE Clear(table: T);

PROCEDURE Insert(table: T; item: Item): BOOLEAN;
inserted in sorted order, returns true if succeeds

PROCEDURE Reverse(table: T);
reverses the order of items

PROCEDURE CopySortedIndexTable(fromSortedIndexTable: T;
     	       toSortedIndexTable: T; n: INTEGER): BOOLEAN;

PROCEDURE CopySortedHashTable(fromSortedHastTable: SortedHashTable.T;
     	       	        toSortedIndexTable: T; n: INTEGER): BOOLEAN;
all the (key,data) pairs are copied into IndexTable, copied as largest ones first

PROCEDURE Print(table: T);

END SortedIndexTable.