Home

Contribute

Source code


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

import classes : '../Classes.ecore';
import classescs : '../ClassesCS.ecore';
import 'helpers.ocl';

transformation classescs2as
{
	leftCS imports classescs;
	rightAS imports classes;
}

map createPackage in classescs2as
{
	check leftCS(packageCS : PackageCS) {}
	enforce rightAS() {
		realize _'package' : Package
	}
	set _'package'.name := if packageCS.hasName()
						then packageCS.name
						else 'unnamed'
						endif;
}

map __root__ in classescs2as
{
	for packageCS : classescs::PackageCS in classescs::PackageCS.allInstances() {
		call createPackage {
			packageCS := packageCS;
		}
	}
}