Skip to main content
aboutsummaryrefslogtreecommitdiffstats
blob: 5261b3d939c9c166ef77fd00d0ff6b38a2493642 (plain) (blame)
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
45
46
47
48
49
50
51
52
53
54
55
56
/*
 * Copyright (c) 2006, 2008 Borland Software Corporation
 * 
 * All rights reserved. This program and the accompanying materials
 * are made available under the terms of the Eclipse Public License v1.0
 * which accompanies this distribution, and is available at
 * http://www.eclipse.org/legal/epl-v10.html
 *
 * Contributors:
 *    Artem Tikhomirov (Borland) - initial API and implementation
 */

IMPORT 'http://www.eclipse.org/gmf/2006/GraphicalDefinition'
IMPORT 'http://www.eclipse.org/emf/2002/Ecore'
EXTENSION Util

DEFINE Init(figureVarName : String) FOR gmfgraph::Border-
figureVarName.setBorder(EXPAND border(figureVarName));
ENDDEFINE

DEFINE InitMethods FOR gmfgraph::Figure
FOREACH getBordersInUse() AS bEXPAND initMethod((getBordersInUse()->indexOf(b) - 1)) FOR bENDFOREACH-
ENDDEFINE

DEFINE initMethod(c : Integer) FOR gmfgraph::CustomBorder-
	/**
	 * @generated
	 */
	private org.eclipse.draw2d.Border createBorderc() {
		EXPAND Runtime::newInstance('result')
		EXPAND attr::CustomClass::Init('result')
		return result;
	}
ENDDEFINE

DEFINE border(figureVarName : String) FOR gmfgraph::Border
ERROR 'This is an abstract definition border(String, Border) invoked for ' + self.repr()
ENDDEFINE

DEFINE border(figureVarName : String) FOR gmfgraph::LineBorder-
new org.eclipse.draw2d.LineBorder(IF null = colornullELSEEXPAND attr::Figure::color(figureVarName.toUpper() + '_BORDER') FOR colorENDIF, EXPAND MapMode::_map FOR width)ENDDEFINE

DEFINE border(figureVarName : String) FOR gmfgraph::MarginBorder-
new org.eclipse.draw2d.MarginBorder(EXPAND MapMode::_map FOR insets)ENDDEFINE

DEFINE border(figureVarName : String) FOR gmfgraph::CompoundBorder-
new org.eclipse.draw2d.CompoundBorder(IF outer = nullnullELSEEXPAND border(figureVarName) FOR outerENDIF, IF inner = nullnullELSEEXPAND border(figureVarName) FOR innerENDIF)
ENDDEFINE

DEFINE border(figureVarName : String) FOR gmfgraph::CustomBorder-
createBordergetBordersInUse()->size()()addBorder(self)-
ENDDEFINE

DEFINE border(figureVarName : String) FOR gmfgraph::BorderRef-
EXPAND border(figureVarName) FOR actual-
ENDDEFINE

Back to the top