blob: 66fce4bb1877f993f00e3f3d6c41c1cb8e5206e4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
-- File: GeomToStep_Root.cdl
-- Created: Mon Jun 14 11:44:56 1993
-- Author: Martine LANGLOIS
-- <mla@mastox>
---Copyright: Matra Datavision 1993
private deferred class Root from GeomToStep
---Purpose : This class implements the common services for
-- all classes of GeomToStep which report error.
is
IsDone(me) returns Boolean
is static;
fields
done : Boolean is protected;
--Equal True if everything is ok, False otherwise.
end Root;
|
