1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
| Quintiq file version 2.0
| #parent: #root
| StaticMethod GetSubtypes (
| const Type type
| ) const remote as constcontent owning structured_Type
| {
| Description: 'Get the sets of subtypes of the given type. The given type is also included in the set.'
| TextBody:
| [*
| result := construct( structured[Type], constcontent );
| result.Add( type );
| for( i := 0; i < result.Size(); i++ )
| {
| traverse( result.Element( i ), Specializations, child )
| {
| result.Add( child );
| }
| }
|
| return & result;
| *]
| }
|
|
