| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960 |
- Listing:
- 1 DEFINITION MODULE Hash;
- 2 (*
- 3 * REPERTOIRE
- 4 * Release 1.6
- 5 * By Charles Bradford and Cole Brecheen
- 6 * (c) Copyright 1985-1992 PMI
- 7 * Green Bay, Wisconsin
- 8 * All rights reserved
- 9 * (414) 468-6040
- 10 *
- 11 * $Header: D:/logfiles/defs/hash.dev 1.4 30 Dec 1990 18:01:10 coleb $
- 12 *
- 13 *)
- 14
- 15
- 16 FROM SYSTEM IMPORT BYTE;
- 17
- 18 TYPE HashTable;
- 19
- 20 PROCEDURE Define( VAR table : HashTable;
- 21 numberBins : CARDINAL; dataBytes : CARDINAL
- 22 );
- 23
- 24 PROCEDURE Dispose( VAR table : HashTable);
- 25
- 26 PROCEDURE Insert( table : HashTable; key : ARRAY
- 27 OF BYTE; data : ARRAY OF BYTE );
- ***** ^ not supported yet
- ***** ^ not supported yet
- 28
- 29 PROCEDURE Delete( table : HashTable);
- 30
- 31 PROCEDURE KeyFind( table : HashTable; key :
- 32 ARRAY OF BYTE ): BOOLEAN;
- ***** ^ not supported yet
- 33
- 34 PROCEDURE GetData( table : HashTable; VAR data :
- 35 ARRAY OF BYTE );
- ***** ^ not supported yet
- 36
- 37 PROCEDURE ChangeData( table : HashTable; data :
- 38 ARRAY OF BYTE );
- ***** ^ not supported yet
- 39
- 40 PROCEDURE Size( table : HashTable) : CARDINAL;
- 41
- 42 PROCEDURE Compute( key : ARRAY OF BYTE; VAR
- ***** ^ not supported yet
- 43 hash1, hash2, hash3 : CARDINAL );
- 44
- 45 PROCEDURE Init();
- 46
- 47 END Hash.
- ***** ^ not supported yet
- 7 errors
|