Integration of OCCT 6.5.0 from SVN
[occt.git] / src / UTL / UTL.cdl
1 -- File:        UTL.cdl
2 -- Created:     Fri Nov 21 17:29:01 1997
3 -- Author:      Mister rmi
4 --              <rmi@frilox.paris1.matra-dtv.fr>
5 ---Copyright:    Matra Datavision 1997
6
7 package UTL
8 uses Resource, TCollection,Storage, OSD
9 is
10
11     xgetenv(aCString: CString from Standard)
12     returns ExtendedString from TCollection;
13     
14     OpenFile(aFile: in out BaseDriver from Storage; aName: ExtendedString from TCollection; aMode : OpenMode from Storage)
15     returns Error from Storage;
16     
17     AddToUserInfo(aData: mutable Data from Storage; anInfo: ExtendedString from TCollection);
18     
19     Path(aFileName: ExtendedString from TCollection) returns Path from OSD;
20
21     Disk(aPath: Path from OSD) returns ExtendedString from TCollection;
22     Trek(aPath: Path from OSD) returns ExtendedString from TCollection;
23     Name(aPath: Path from OSD) returns ExtendedString from TCollection;
24     Extension(aPath: Path from OSD) returns ExtendedString from TCollection;
25
26     FileIterator(aPath: Path from OSD; aMask:ExtendedString from TCollection) returns FileIterator from OSD;
27    
28     Extension(aFileName: ExtendedString from TCollection) returns ExtendedString from TCollection;
29     
30     LocalHost returns ExtendedString from TCollection;
31     
32     ExtendedString(anAsciiString: AsciiString from TCollection) 
33     returns ExtendedString from TCollection;
34
35
36     GUID(anXString: ExtendedString from TCollection)
37     returns GUID from Standard;
38
39     Find(aResourceManager: Manager from Resource; aResourceName: ExtendedString from TCollection)
40     returns Boolean from Standard;
41     
42     Value(aResourceManager: Manager from Resource; aResourceName: ExtendedString from TCollection)
43     returns ExtendedString from TCollection;
44     
45
46     IntegerValue(anExtendedString: ExtendedString from TCollection)
47     returns Integer from Standard;
48     
49     CString(anExtendedString: ExtendedString from TCollection)
50     returns CString from Standard;
51
52     IsReadOnly(aFileName: ExtendedString from TCollection)
53     returns Boolean from Standard;
54     
55 end UTL;