blob: abd29c1f82aeaa8078de2c1133b0f3927e9b8aa7 (
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
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
-- File: SiUnit.cdl
-- Created: Mon Dec 4 12:02:31 1995
-- Author: EXPRESS->CDL V0.2 Translator
-- Copyright: Matra-Datavision 1993
class RWSiUnit from RWStepBasic
---Purpose : Read & Write Module for SiUnit
uses
Check from Interface,
StepReaderData from StepData,
StepWriter from StepData,
SiUnit from StepBasic,
SiPrefix from StepBasic,
SiUnitName from StepBasic,
AsciiString from TCollection
is
Create returns RWSiUnit;
ReadStep (me; data: StepReaderData; num: Integer;
ach : in out Check; ent: mutable SiUnit from StepBasic);
WriteStep (me; SW : in out StepWriter; ent : SiUnit from StepBasic);
DecodePrefix(me; aPrefix: in out SiPrefix from StepBasic;
text : CString from Standard)
returns Boolean;
DecodeName(me; aName: in out SiUnitName from StepBasic;
text : CString from Standard)
returns Boolean;
EncodePrefix(me; aPrefix: SiPrefix from StepBasic) returns AsciiString from TCollection;
EncodeName(me; aName: SiUnitName from StepBasic) returns AsciiString from TCollection;
end RWSiUnit;
|