blob: 932de4e82ab23223a733898e4f5ef40dcdd819f4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
-- File: PCollection_Hash.cdl
-- Created: Mon Apr 22 16:26:20 1991
-- Author: jean pierre TIRAULT
-- <jpt@topsn1>
---Copyright: Matra Datavision 1991
generic class Hash from PCollection (key as Storable) inherits Storable
is
Create returns Hash;
---Purpose : Empty constructor.
HashCode (me; MyKey : key ; Upper : Integer)
returns Integer is virtual;
---Level: Public
---Purpose: Returns a hashcod value of key bounded by Upper.
Compare (me; One , Two : key) returns Boolean is virtual;
---Level: Public
---Purpose : Compare two keys and returns a boolean value
end;
|