summaryrefslogtreecommitdiff
path: root/tex/context/base/modu-arg.tex
blob: 094625477c2ce5cf7e4933c8208aaa59a0fc798f (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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
\unprotect

\newcounter\CurrentArgument 
\newif\ifInsideArgument

\def\TypeSetCharacteristic%
  {\bgroup
   \doglobal\newcounter\CurrentArgument % also every \setup
   \global\InsideArgumentfalse
   \def\\{\par\egroup}
   {\bs\translate[nl=doel,de=Zweck,en=purpose]\unskip}\par
   \nobreak
   \hangindent1em
   \hangafter-100
   \ignorespaces}

\def\ShowArgument%
  {\InsideArgumentfalse
   \doglobal\increment\CurrentArgument
   {\bf..\CurrentArgument..}}

\def\DummyArgument%
  {\InsideArgumentfalse
   \doglobal\increment\CurrentArgument}

\def\doTypeSetParameter#1\\%
  {\bgroup
   \ifInsideArgument \else
     \InsideArgumenttrue
     \doglobal\increment\CurrentArgument
     \blanko
   \fi
   {\bf#1\unskip}\par
   \nobreak
   \hangindent1em
   \hangafter-100
   \def\\{\par\egroup\protect}%
   \ignorespaces}

\def\TypeSetParameter%
  {\unprotect
   \doTypeSetParameter}

\def\TypeSetArgument%
  {\InsideArgumentfalse
   \doglobal\increment\CurrentArgument
   \blanko
   \bgroup
   {\bf\ifv!numberingdots!.\CurrentArgument.\else...\fi}\par
   \nobreak
   \hangindent1em
   \hangafter-100
   \def\\{\par\egroup}%
   \ignorespaces}

\def\TypeSetInheritance%
  {\TypeSetArgument % we can use label, message, interface ...
   \indent\getmessage{setup}{see} \tttf\texescape\ignorespaces}
 
\def\TypeSetValue#1%
  {\unprotect{\tttf#1}\protect}

\startcommands           dutch            english           german 

  TypeSetCharacteristic: functie          function          funktion
       TypeSetParameter: parameter        parameter         parameter
           ShowArgument: toonargument     showargument      umargument
          DummyAgrument: dummyargument    dummyargument     dummyargument
        TypeSetArgument: argument         argument          argument
     TypeSetInheritance: erfenis          inheritance       inheritance
           TypeSetValue: waarde           value             wert

\stopcommands

\protect