1 dnl---------------------------------------------------------------------------

2 dnl Basic macros

3 dnl---------------------------------------------------------------------------

4 dnl

5 define(`_Node', `"$1"ifelse($#,1,,` [shift($@)]')')dnl

6 define(`_Link', `"$1" -> "$2"ifelse($#,2,,` [shift(shift($@))]')')dnl

7 dnl

8 define(`_Label', `$1, label="$2"')

9 dnl

10 define(`_Subgraph', `subgraph cluster_$1 { shift($@) }')dnl

11 dnl

12 dnl---------------------------------------------------------------------------

13 dnl Styles

14 dnl---------------------------------------------------------------------------

15 dnl

16 define(`_Process', `_Node($*, shape=box)')dnl

17 define(`_Datastore', `_Node($*, shape=ellipse)')dnl

18 define(`_External', `_Node($*, shape=box, style=filled)')dnl

19 dnl

20 define(`_BoldLink', `_Link($*, style=bold)')dnl

21 define(`_DotLink', `_Link($*, style=dotted)')dnl

22 define(`_DashLink', `_Link($*, style=dashed)')dnl

23 dnl

24 dnl---------------------------------------------------------------------------

25 dnl Prototypes and Traits

26 dnl---------------------------------------------------------------------------

27 dnl

28 define(`_proto', `_Node(pr_$*, label="$1", shape=ellipse)')dnl

29 define(`_traits', `_Node(tr_$*, label="tr. $1", shape=box, style=filled)')dnl

30 define(`_delegate', `_Link($1, $2, label="$3", style=bold)')dnl

31 define(`_slot', `_Link($1, $2, label="$3")')dnl

32 define(`_simple', `_proto($1); _delegate(pr_$1, tr_$1, traits)')dnl

33 define(`_simple2', `_proto($1); _delegate(pr_$1, tr_$2, traits)')dnl

34 define(`_oddball', `_simple2($1, Oddball)')dnl