]>
Commit | Line | Data |
---|---|---|
70482933 RK |
1 | ------------------------------------------------------------------------------ |
2 | -- -- | |
fbf5a39b | 3 | -- GNAT COMPILER COMPONENTS -- |
70482933 RK |
4 | -- -- |
5 | -- B I N D U S G -- | |
6 | -- -- | |
7 | -- B o d y -- | |
8 | -- -- | |
fbf5a39b | 9 | -- Copyright (C) 1992-2003 Free Software Foundation, Inc. -- |
70482933 RK |
10 | -- -- |
11 | -- GNAT is free software; you can redistribute it and/or modify it under -- | |
12 | -- terms of the GNU General Public License as published by the Free Soft- -- | |
13 | -- ware Foundation; either version 2, or (at your option) any later ver- -- | |
14 | -- sion. GNAT is distributed in the hope that it will be useful, but WITH- -- | |
15 | -- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- | |
16 | -- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- | |
17 | -- for more details. You should have received a copy of the GNU General -- | |
18 | -- Public License distributed with GNAT; see file COPYING. If not, write -- | |
19 | -- to the Free Software Foundation, 59 Temple Place - Suite 330, Boston, -- | |
20 | -- MA 02111-1307, USA. -- | |
21 | -- -- | |
22 | -- GNAT was originally developed by the GNAT team at New York University. -- | |
71ff80dc | 23 | -- Extensive contributions were provided by Ada Core Technologies Inc. -- |
70482933 RK |
24 | -- -- |
25 | ------------------------------------------------------------------------------ | |
26 | ||
27 | with Osint; use Osint; | |
28 | with Output; use Output; | |
29 | ||
30 | procedure Bindusg is | |
31 | ||
70482933 RK |
32 | -- Start of processing for Bindusg |
33 | ||
34 | begin | |
35 | -- Usage line | |
36 | ||
37 | Write_Str ("Usage: "); | |
38 | Write_Program_Name; | |
39 | Write_Char (' '); | |
40 | Write_Str ("switches lfile"); | |
41 | Write_Eol; | |
42 | Write_Eol; | |
43 | ||
44 | -- Line for -aO switch | |
45 | ||
07fc65c4 | 46 | Write_Str (" -aOdir Specify library files search path"); |
70482933 RK |
47 | Write_Eol; |
48 | ||
49 | -- Line for -aI switch | |
50 | ||
07fc65c4 | 51 | Write_Str (" -aIdir Specify source files search path"); |
70482933 RK |
52 | Write_Eol; |
53 | ||
54 | -- Line for A switch | |
55 | ||
07fc65c4 | 56 | Write_Str (" -A Generate binder program in Ada (default)"); |
70482933 RK |
57 | Write_Eol; |
58 | ||
59 | -- Line for -b switch | |
60 | ||
07fc65c4 | 61 | Write_Str (" -b Generate brief messages to std"); |
70482933 RK |
62 | Write_Str ("err even if verbose mode set"); |
63 | Write_Eol; | |
64 | ||
65 | -- Line for -c switch | |
66 | ||
07fc65c4 | 67 | Write_Str (" -c Check only, no generation of b"); |
70482933 RK |
68 | Write_Str ("inder output file"); |
69 | Write_Eol; | |
70 | ||
71 | -- Line for C switch | |
72 | ||
07fc65c4 | 73 | Write_Str (" -C Generate binder program in C"); |
70482933 RK |
74 | Write_Eol; |
75 | ||
76 | -- Line for -e switch | |
77 | ||
07fc65c4 | 78 | Write_Str (" -e Output complete list of elabor"); |
70482933 RK |
79 | Write_Str ("ation order dependencies"); |
80 | Write_Eol; | |
81 | ||
82 | -- Line for -E switch | |
83 | ||
07fc65c4 | 84 | Write_Str (" -E Store tracebacks in Exception occurrences"); |
70482933 RK |
85 | Write_Eol; |
86 | ||
fbf5a39b AC |
87 | -- The -f switch is voluntarily omitted, because it is obsolete |
88 | ||
89 | -- Line for -F switch | |
90 | ||
91 | Write_Str (" -F Force checking of elaboration Flags"); | |
92 | Write_Eol; | |
93 | ||
70482933 RK |
94 | -- Line for -h switch |
95 | ||
07fc65c4 | 96 | Write_Str (" -h Output this usage (help) infor"); |
70482933 RK |
97 | Write_Str ("mation"); |
98 | Write_Eol; | |
99 | ||
226ada7a | 100 | -- Lines for -I switch |
70482933 | 101 | |
07fc65c4 | 102 | Write_Str (" -Idir Specify library and source files search path"); |
70482933 RK |
103 | Write_Eol; |
104 | ||
07fc65c4 | 105 | Write_Str (" -I- Don't look for sources & library files"); |
70482933 RK |
106 | Write_Str (" in default directory"); |
107 | Write_Eol; | |
108 | ||
109 | -- Line for -K switch | |
110 | ||
07fc65c4 | 111 | Write_Str (" -K Give list of linker options specified for link"); |
70482933 RK |
112 | Write_Eol; |
113 | ||
114 | -- Line for -l switch | |
115 | ||
07fc65c4 | 116 | Write_Str (" -l Output chosen elaboration order"); |
70482933 RK |
117 | Write_Eol; |
118 | ||
119 | -- Line of -L switch | |
120 | ||
07fc65c4 | 121 | Write_Str (" -Lxyz Library build: adainit/final "); |
70482933 RK |
122 | Write_Str ("renamed to xyzinit/final, implies -n"); |
123 | Write_Eol; | |
124 | ||
125 | -- Line for -M switch | |
126 | ||
07fc65c4 | 127 | Write_Str (" -Mxyz Rename generated main program from main to xyz"); |
70482933 RK |
128 | Write_Eol; |
129 | ||
130 | -- Line for -m switch | |
131 | ||
07fc65c4 | 132 | Write_Str (" -mnnn Limit number of detected error"); |
fbf5a39b | 133 | Write_Str ("s to nnn (1-999999)"); |
70482933 RK |
134 | Write_Eol; |
135 | ||
136 | -- Line for -n switch | |
137 | ||
07fc65c4 | 138 | Write_Str (" -n No Ada main program (foreign main routine)"); |
70482933 RK |
139 | Write_Eol; |
140 | ||
141 | -- Line for -nostdinc | |
142 | ||
07fc65c4 | 143 | Write_Str (" -nostdinc Don't look for source files"); |
70482933 RK |
144 | Write_Str (" in the system default directory"); |
145 | Write_Eol; | |
146 | ||
147 | -- Line for -nostdlib | |
148 | ||
07fc65c4 | 149 | Write_Str (" -nostdlib Don't look for library files"); |
70482933 RK |
150 | Write_Str (" in the system default directory"); |
151 | Write_Eol; | |
152 | ||
153 | -- Line for -o switch | |
154 | ||
07fc65c4 | 155 | Write_Str (" -o file Give the output file name (default is b~xxx.adb) "); |
70482933 RK |
156 | Write_Eol; |
157 | ||
158 | -- Line for -O switch | |
159 | ||
07fc65c4 | 160 | Write_Str (" -O Give list of objects required for link"); |
70482933 RK |
161 | Write_Eol; |
162 | ||
163 | -- Line for -p switch | |
164 | ||
07fc65c4 | 165 | Write_Str (" -p Pessimistic (worst-case) elaborat"); |
70482933 RK |
166 | Write_Str ("ion order"); |
167 | Write_Eol; | |
168 | ||
07fc65c4 GB |
169 | -- Line for -r switch |
170 | ||
171 | Write_Str (" -r List restrictions that could be a"); | |
172 | Write_Str ("pplied to this partition"); | |
173 | Write_Eol; | |
174 | ||
70482933 RK |
175 | -- Line for -s switch |
176 | ||
07fc65c4 | 177 | Write_Str (" -s Require all source files to be"); |
70482933 RK |
178 | Write_Str (" present"); |
179 | Write_Eol; | |
180 | ||
181 | -- Line for -Sxx switch | |
182 | ||
07fc65c4 | 183 | Write_Str (" -S?? Sin/lo/hi/xx for Initialize_Scalars"); |
70482933 RK |
184 | Write_Str (" invalid/low/high/hex"); |
185 | Write_Eol; | |
186 | ||
187 | -- Line for -static | |
188 | ||
07fc65c4 | 189 | Write_Str (" -static Link against a static GNAT run time"); |
70482933 RK |
190 | Write_Eol; |
191 | ||
192 | -- Line for -shared | |
193 | ||
07fc65c4 | 194 | Write_Str (" -shared Link against a shared GNAT run time"); |
70482933 RK |
195 | Write_Eol; |
196 | ||
197 | -- Line for -t switch | |
198 | ||
07fc65c4 | 199 | Write_Str (" -t Tolerate time stamp and other consistency errors"); |
70482933 RK |
200 | Write_Eol; |
201 | ||
202 | -- Line for -T switch | |
203 | ||
bcea76b6 | 204 | Write_Str (" -Tn Set time slice value to n milliseconds (n >= 0)"); |
70482933 RK |
205 | Write_Eol; |
206 | ||
207 | -- Line for -v switch | |
208 | ||
07fc65c4 | 209 | Write_Str (" -v Verbose mode. Error messages, "); |
70482933 RK |
210 | Write_Str ("header, summary output to stdout"); |
211 | Write_Eol; | |
212 | ||
213 | -- Lines for -w switch | |
214 | ||
07fc65c4 | 215 | Write_Str (" -wx Warning mode. (x=s/e for supp"); |
70482933 RK |
216 | Write_Str ("ress/treat as error)"); |
217 | Write_Eol; | |
218 | ||
219 | -- Line for -x switch | |
220 | ||
07fc65c4 | 221 | Write_Str (" -x Exclude source files (check ob"); |
70482933 RK |
222 | Write_Str ("ject consistency only)"); |
223 | Write_Eol; | |
224 | ||
225 | -- Line for -z switch | |
226 | ||
07fc65c4 GB |
227 | Write_Str (" -z No main subprogram (zero main)"); |
228 | Write_Eol; | |
229 | ||
230 | -- Line for --RTS | |
231 | ||
232 | Write_Str (" --RTS=dir specify the default source and object search path"); | |
70482933 RK |
233 | Write_Eol; |
234 | ||
235 | -- Line for sfile | |
236 | ||
237 | Write_Str (" lfile Library file names"); | |
238 | Write_Eol; | |
239 | ||
240 | end Bindusg; |