blob: a4e0114885397f53c3033562f56ceeb54bb131a9 (
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
|
-- File: BOPTools_PaveBlockMapHasher.cdl
-- Created: Thu Dec 11 14:09:07 2003
-- Author: Peter KURNEV
-- <pkv@irinox>
---Copyright: Matra Datavision 2003
class PaveBlockMapHasher from BOPTools
---Purpose:
uses
PaveBlock from BOPTools
--raises
is
HashCode(myclass;
aPB : PaveBlock from BOPTools;
Upper : Integer from Standard)
returns Integer from Standard;
IsEqual(myclass;
aPB1 : PaveBlock from BOPTools;
aPB2 : PaveBlock from BOPTools)
returns Boolean from Standard;
--fields
end PaveBlockMapHasher;
|