diff options
author | Jing Yu <jingyu@google.com> | 2010-07-22 14:03:48 -0700 |
---|---|---|
committer | Jing Yu <jingyu@google.com> | 2010-07-22 14:03:48 -0700 |
commit | b094d6c4bf572654a031ecc4afe675154c886dc5 (patch) | |
tree | 89394c56b05e13a5413ee60237d65b0214fd98e2 /gcc-4.4.3/gcc/ada/makeusg.adb | |
parent | dc34721ac3bf7e3c406fba8cfe9d139393345ec5 (diff) | |
download | toolchain_gcc-b094d6c4bf572654a031ecc4afe675154c886dc5.tar.gz toolchain_gcc-b094d6c4bf572654a031ecc4afe675154c886dc5.tar.bz2 toolchain_gcc-b094d6c4bf572654a031ecc4afe675154c886dc5.zip |
commit gcc-4.4.3 which is used to build gcc-4.4.3 Android toolchain in master.
The source is based on fsf gcc-4.4.3 and contains local patches which
are recorded in gcc-4.4.3/README.google.
Change-Id: Id8c6d6927df274ae9749196a1cc24dbd9abc9887
Diffstat (limited to 'gcc-4.4.3/gcc/ada/makeusg.adb')
-rw-r--r-- | gcc-4.4.3/gcc/ada/makeusg.adb | 346 |
1 files changed, 346 insertions, 0 deletions
diff --git a/gcc-4.4.3/gcc/ada/makeusg.adb b/gcc-4.4.3/gcc/ada/makeusg.adb new file mode 100644 index 000000000..ca22dceec --- /dev/null +++ b/gcc-4.4.3/gcc/ada/makeusg.adb @@ -0,0 +1,346 @@ +------------------------------------------------------------------------------ +-- -- +-- GNAT COMPILER COMPONENTS -- +-- -- +-- M A K E U S G -- +-- -- +-- B o d y -- +-- -- +-- Copyright (C) 1992-2008, Free Software Foundation, Inc. -- +-- -- +-- GNAT is free software; you can redistribute it and/or modify it under -- +-- terms of the GNU General Public License as published by the Free Soft- -- +-- ware Foundation; either version 3, or (at your option) any later ver- -- +-- sion. GNAT is distributed in the hope that it will be useful, but WITH- -- +-- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- +-- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- +-- for more details. You should have received a copy of the GNU General -- +-- Public License distributed with GNAT; see file COPYING3. If not, go to -- +-- http://www.gnu.org/licenses for a complete copy of the license. -- +-- -- +-- GNAT was originally developed by the GNAT team at New York University. -- +-- Extensive contributions were provided by Ada Core Technologies Inc. -- +-- -- +------------------------------------------------------------------------------ + +with Osint; use Osint; +with Output; use Output; +with Usage; + +procedure Makeusg is + +-- Start of processing for Makeusg + +begin + -- Usage line + + Write_Str ("Usage: "); + Osint.Write_Program_Name; + Write_Str (" opts name "); + Write_Str ("{[-cargs opts] [-bargs opts] [-largs opts] [-margs opts]}"); + Write_Eol; + Write_Eol; + Write_Str (" name is one or more file name from which you"); + Write_Str (" can omit the .adb or .ads suffix"); + Write_Eol; + Write_Eol; + + -- GNATMAKE switches + + Write_Str ("gnatmake switches:"); + Write_Eol; + + -- Line for -a + + Write_Str (" -a Consider all files, even readonly ali files"); + Write_Eol; + + -- Line for -b + + Write_Str (" -b Bind only"); + Write_Eol; + + -- Line for -B + + Write_Str (" -B Build, bind and link full project"); + Write_Eol; + + -- Line for -c + + Write_Str (" -c Compile only"); + Write_Eol; + + -- Line for -C + + Write_Str (" -C Cache source mappings: " & + "invoke compiler with temp mapping file"); + Write_Eol; + + -- Line for -C=<mapping file> + + Write_Str (" -C=mapp Cache source mappings: " & + "invoke compiler with mapping file mapp"); + Write_Eol; + + -- Line for -D + + Write_Str (" -D dir Specify dir as the object directory"); + Write_Eol; + + -- Line for -eI + + Write_Str (" -eI Index of unit in multi-unit source file"); + Write_Eol; + + -- Line for -eL + + Write_Str (" -eL Follow symbolic links when processing " & + "project files"); + Write_Eol; + + -- Line for -eS + + Write_Str (" -eS Echo commands to stdout instead of stderr"); + Write_Eol; + + -- Line for -f + + Write_Str (" -f Force recompilations of non predefined units"); + Write_Eol; + + -- Line for -F + + Write_Str (" -F Full project path name in brief error messages"); + Write_Eol; + + -- Line for -i + + Write_Str (" -i In place. Replace existing ali file, "); + Write_Str ("or put it with source"); + Write_Eol; + + -- Line for -jnnn + + Write_Str (" -jnum Use nnn processes to compile"); + Write_Eol; + + -- Line for -k + + Write_Str (" -k Keep going after compilation errors"); + Write_Eol; + + -- Line for -l + + Write_Str (" -l Link only"); + Write_Eol; + + -- Line for -m + + Write_Str (" -m Minimal recompilation"); + Write_Eol; + + -- Line for -M + + Write_Str (" -M List object file dependences for Makefile"); + Write_Eol; + + -- Line for -n + + Write_Str (" -n Check objects up to date, output next file "); + Write_Str ("to compile if not"); + Write_Eol; + + -- Line for -o + + Write_Str (" -o name Choose an alternate executable name"); + Write_Eol; + + -- Line for -p + + Write_Str (" -p Create missing obj, lib and exec dirs"); + Write_Eol; + + -- Line for -P + + Write_Str (" -Pproj Use GNAT Project File proj"); + Write_Eol; + + -- Line for -q + + Write_Str (" -q Be quiet/terse"); + Write_Eol; + + -- Line for -R + + Write_Str (" -R Do not use a run_path_option when linking"); + Write_Eol; + + -- Line for -s + + Write_Str (" -s Recompile if compiler switches have changed"); + Write_Eol; + + -- Line for -u + + Write_Str (" -u Unique compilation, only compile the given files"); + Write_Eol; + + -- Line for -U + + Write_Str (" -U Unique compilation for all sources of all projects"); + Write_Eol; + + -- Line for -v + + Write_Str (" -v Display reasons for all (re)compilations"); + Write_Eol; + + -- Line for -vPx + + Write_Str (" -vPx Specify verbosity when parsing GNAT Project Files"); + Write_Eol; + + -- Line for -we + + Write_Str (" -we Treat all warnings as errors"); + Write_Eol; + + -- Line for -wn + + Write_Str (" -wn Normal warning mode (cancels -we/-ws)"); + Write_Eol; + + -- Line for -ws + + Write_Str (" -ws Suppress all warnings"); + Write_Eol; + + -- Line for -x + + Write_Str (" -x " & + "Allow compilation of needed units external to the projects"); + Write_Eol; + + -- Line for -X + + Write_Str (" -Xnm=val Specify an external reference for GNAT " & + "Project Files"); + Write_Eol; + + -- Line for -z + + Write_Str (" -z No main subprogram (zero main)"); + Write_Eol; + Write_Eol; + + Write_Str (" --GCC=command Use this gcc command"); + Write_Eol; + + Write_Str (" --GNATBIND=command Use this gnatbind command"); + Write_Eol; + + Write_Str (" --GNATLINK=command Use this gnatlink command"); + Write_Eol; + Write_Eol; + + -- Source and Library search path switches + + Write_Str ("Project, Source and Library search path switches:"); + Write_Eol; + + -- Line for -aP + + Write_Str (" -aPdir Add directory dir to project search path"); + Write_Eol; + + -- Line for -aL + + Write_Str (" -aLdir Skip missing library sources if ali in dir"); + Write_Eol; + + -- Line for -A + + Write_Str (" -Adir like -aLdir -aIdir"); + Write_Eol; + + -- Line for -aO switch + + Write_Str (" -aOdir Specify library/object files search path"); + Write_Eol; + + -- Line for -aI switch + + Write_Str (" -aIdir Specify source files search path"); + Write_Eol; + + -- Line for -I switch + + Write_Str (" -Idir Like -aIdir -aOdir"); + Write_Eol; + + -- Line for -I- switch + + Write_Str (" -I- Don't look for sources & library files"); + Write_Str (" in the default directory"); + Write_Eol; + + -- Line for -L + + Write_Str (" -Ldir Look for program libraries also in dir"); + Write_Eol; + + -- Line for -nostdinc + + Write_Str (" -nostdinc Don't look for sources"); + Write_Str (" in the system default directory"); + Write_Eol; + + -- Line for -nostdlib + + Write_Str (" -nostdlib Don't look for library files"); + Write_Str (" in the system default directory"); + Write_Eol; + + -- Line for --RTS + + Write_Str (" --RTS=dir specify the default source and object search" + & " path"); + Write_Eol; + + -- Line for --subdirs= + + Write_Str (" --subdirs=dir real obj/lib/exec dirs are subdirs"); + Write_Eol; + Write_Eol; + + -- General Compiler, Binder, Linker switches + + Write_Str ("To pass an arbitrary switch to the Compiler, "); + Write_Str ("Binder or Linker:"); + Write_Eol; + + -- Line for -cargs + + Write_Str (" -cargs opts opts are passed to the compiler"); + Write_Eol; + + -- Line for -bargs + + Write_Str (" -bargs opts opts are passed to the binder"); + Write_Eol; + + -- Line for -largs + + Write_Str (" -largs opts opts are passed to the linker"); + Write_Eol; + + -- Line for -margs + + Write_Str (" -margs opts opts are passed to gnatmake"); + Write_Eol; + + -- Add usage information for gcc + + Usage; + +end Makeusg; |