blob: 09d8eed91bb272fff83d7eebb6f090ed8853249f (
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
|
-- File: Dico.cdl
-- Created: Tue Jul 28 16:05:33 1992
-- Author: Christian CAILLET
-- <cky@phylox>
---Copyright: Matra Datavision 1992
package Dico
---Purpose : Defines alphanumeric dictionaries and iterators on them
-- Those are generic classes (Iterator is nested in Dictionary)
-- Three default instantiations are offered :
-- with Integer and Handle Objects (Persistent and Transient)
uses TCollection, MMgt, Standard
is
generic class Dictionary,Iterator,StackItem;
class DictionaryOfInteger instantiates Dictionary (Integer);
class DictionaryOfTransient instantiates Dictionary (Transient);
end Dico;
|