blob: 11de6ffc17c04cac30db5f798ace5751899762f7 (
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
|
-- File: Vrml_Info.cdl
-- Created: Mon Feb 10 15:58:29 1997
-- Author: Alexander BRIVIN
-- <brivin@minox.nizhny.matra-dtv.fr>
---Copyright: Matra Datavision 1997
class Info from Vrml
---Purpose: defines a Info node of VRML specifying properties of geometry
--- and its appearance.
-- It is used to store information in the scene graph,
-- Typically for application-specific purposes, copyright messages,
-- or other strings.
uses
AsciiString from TCollection
is
Create ( aString : AsciiString from TCollection = "<Undefined info>")
returns Info from Vrml;
SetString ( me : in out; aString : AsciiString from TCollection );
String ( me ) returns AsciiString from TCollection;
Print ( me; anOStream: in out OStream from Standard ) returns OStream from Standard;
---C++: return &
fields
myString : AsciiString from TCollection; -- Info string
end Info;
|