~ubuntu-branches/ubuntu/hoary/binutils/hoary

« back to all changes in this revision

Viewing changes to bfd/doc/proto.str

  • Committer: Bazaar Package Importer
  • Author(s): James Troup
  • Date: 2004-05-19 10:35:44 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20040519103544-17h3o6e8pwndydrg
Tags: 2.14.90.0.7-8
debian/rules: don't use gcc-2.95 on m68k.  Thanks to Adam Conrad for
pointing this out.

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
 
 
2
: SYNOPSIS
 
3
        skip_past_newline
 
4
        get_stuff_in_command    
 
5
        paramstuff
 
6
        indent
 
7
        maybecatstr
 
8
;
 
9
 
 
10
: ignore
 
11
        skip_past_newline 
 
12
        get_stuff_in_command
 
13
        outputdots
 
14
        maybecatstr
 
15
        ;
 
16
 
 
17
: CODE_FRAGMENT
 
18
        ignore ;
 
19
 
 
20
: external
 
21
        0 internalmode ignore ;
 
22
 
 
23
: internal 
 
24
        1 internalmode ignore ;
 
25
 
 
26
- input stack { a b } output b if internal, a if external
 
27
: ifinternal
 
28
        "" swap 1 internalmode maybecatstr
 
29
        swap
 
30
        "" swap 0 internalmode maybecatstr
 
31
        catstr
 
32
        ;
 
33
 
 
34
- Put note in output string, regardless of internal mode.
 
35
: COMMENT
 
36
        skip_past_newline
 
37
        get_stuff_in_command
 
38
        translatecomments
 
39
        catstr
 
40
        ;
 
41
 
 
42
- SENUM    enum-type-name
 
43
- ENUM     enum-name
 
44
- ENUMX    addl-enum-name
 
45
- ENUMDOC  doc for preceding enums
 
46
- ENDSENUM max-enum-name
 
47
 
 
48
: make_enum_header
 
49
        dup
 
50
        "enum " swap catstr
 
51
        " {\n" catstr
 
52
        swap "  _dummy_first_" swap catstr catstr
 
53
        ",\n" catstr
 
54
        ;
 
55
: make_string_table_header
 
56
        dup
 
57
        "#ifdef _BFD_MAKE_TABLE_" swap catstr swap
 
58
        "\n\nstatic const char *const " swap catstr catstr
 
59
        "_names[] = { \"@@uninitialized@@\",\n" catstr
 
60
        ;
 
61
: SENUM
 
62
        skip_past_newline
 
63
        copy_past_newline
 
64
        remchar
 
65
        dup
 
66
        make_enum_header
 
67
        swap
 
68
        make_string_table_header
 
69
        ifinternal
 
70
        catstr
 
71
        get_stuff_in_command catstr
 
72
        translatecomments ;
 
73
: ENDSENUM
 
74
        skip_past_newline
 
75
        copy_past_newline strip_trailing_newlines
 
76
        dup
 
77
        "  " swap catstr " };\n" catstr swap
 
78
        " \"@@overflow: " swap catstr "@@\",\n};\n#endif\n\n" catstr
 
79
        ifinternal
 
80
        catstr
 
81
        ;
 
82
: make_enumerator
 
83
        "  " swap catstr
 
84
        ",\n" catstr
 
85
        ;
 
86
: make_enumerator_string
 
87
        "  \"" swap catstr
 
88
        "\",\n" catstr
 
89
        ;
 
90
: ENUM
 
91
        skip_past_newline
 
92
        copy_past_newline
 
93
        remchar
 
94
        dup
 
95
        make_enumerator
 
96
        swap
 
97
        make_enumerator_string
 
98
        ifinternal
 
99
        ;
 
100
: ENUMX ENUM catstr ;
 
101
: ENUMEQ
 
102
        skip_past_newline
 
103
        "#define "
 
104
        copy_past_newline remchar
 
105
        catstr
 
106
        " "
 
107
        catstr
 
108
        copy_past_newline
 
109
        catstr
 
110
        "" swap 0 internalmode maybecatstr
 
111
        ;
 
112
: ENUMEQX ENUMEQ catstr ;
 
113
: ENUMDOC
 
114
        skip_past_newline
 
115
        get_stuff_in_command
 
116
        strip_trailing_newlines
 
117
        "\n{* " swap catstr "  *}\n" catstr
 
118
        translatecomments
 
119
        - discard it if we're doing internal mode
 
120
        "" swap 0 internalmode maybecatstr
 
121
        swap
 
122
        catstr catstr
 
123
        ;
 
124
: ENDDD external ;
 
125
: SECTION ignore ;
 
126
: SUBSECTION ignore ;
 
127
: SUBSUBSECTION ignore ;
 
128
: INTERNAL_DEFINITION internal ;
 
129
: DESCRIPTION ignore ;
 
130
: FUNCTION external ;
 
131
: RETURNS ignore ;
 
132
: TYPEDEF external ;
 
133
: INTERNAL_FUNCTION internal ;
 
134
: INTERNAL internal ;
 
135
: INODE ignore ;