obtained gcc-4.6.4.tar.bz2 from upstream website;upstream

verified gcc-4.6.4.tar.bz2.sig;
imported gcc-4.6.4 source tree from verified upstream tarball.

downloading a git-generated archive based on the 'upstream' tag
should provide you with a source tree that is binary identical
to the one extracted from the above tarball.

if you have obtained the source via the command 'git clone',
however, do note that line-endings of files in your working
directory might differ from line-endings of the respective
files in the upstream repository.

1 files changed, 377 insertions, 0 deletions

diff --git a/gcc/ada/makeusg.adb b/gcc/ada/makeusg.adb
new file mode 100644
index 000000000..bc3438727
--- /dev/null
+++ b/gcc/ada/makeusg.adb
@@ -0,0 +1,377 @@
+------------------------------------------------------------------------------
+--                                                                          --
+--                         GNAT COMPILER COMPONENTS                         --
+--                                                                          --
+--                              M A K E U S G                               --
+--                                                                          --
+--                                 B o d y                                  --
+--                                                                          --
+--          Copyright (C) 1992-2010, 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 Makeutl;
+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 -vl
+
+   Write_Str ("  -vl      Verbose output (low verbosity)");
+   Write_Eol;
+
+   --  Line for -vm
+
+   Write_Str ("  -vm      Verbose output (medium verbosity)");
+   Write_Eol;
+
+   --  Line for -vh
+
+   Write_Str ("  -vh      Equivalent to -v (high verbosity)");
+   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;
+
+   --  Line for --source-info=
+
+   Write_Str ("  ");
+   Write_Str (Makeutl.Source_Info_Option);
+   Write_Str ("file specify a source info file");
+   Write_Eol;
+
+   --  Line for --unchecked-shared-lib-imports
+
+   Write_Str ("  ");
+   Write_Str (Makeutl.Unchecked_Shared_Lib_Imports);
+   Write_Eol;
+   Write_Str ("            Allow shared libraries to import static libraries");
+   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;