with Osint; use Osint;
with Output; use Output;
with Usage;
procedure Makeusg is
begin
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;
Write_Str ("gnatmake switches:");
Write_Eol;
Write_Str (" -a Consider all files, even readonly ali files");
Write_Eol;
Write_Str (" -b Bind only");
Write_Eol;
Write_Str (" -c Compile only");
Write_Eol;
Write_Str (" -C Cache source mappings: " &
"invoke the compiler with a mapping file");
Write_Eol;
Write_Str (" -f Force recompilations of non predefined units");
Write_Eol;
Write_Str (" -i In place. Replace existing ali file, ");
Write_Str ("or put it with source");
Write_Eol;
Write_Str (" -jnum Use nnn processes to compile");
Write_Eol;
Write_Str (" -k Keep going after compilation errors");
Write_Eol;
Write_Str (" -l Link only");
Write_Eol;
Write_Str (" -m Minimal recompilation");
Write_Eol;
Write_Str (" -M List object file dependences for Makefile");
Write_Eol;
Write_Str (" -n Check objects up to date, output next file ");
Write_Str ("to compile if not");
Write_Eol;
Write_Str (" -o name Choose an alternate executable name");
Write_Eol;
Write_Str (" -Pproj Use GNAT Project File proj");
Write_Eol;
Write_Str (" -q Be quiet/terse");
Write_Eol;
Write_Str (" -s Recompile if compiler switches have changed");
Write_Eol;
Write_Str (" -u Unique compilation. Only compile the given file.");
Write_Eol;
Write_Str (" -v Display reasons for all (re)compilations");
Write_Eol;
Write_Str (" -vPx Specify verbosity when parsing GNAT Project Files");
Write_Eol;
Write_Str (" -Xnm=val Specify an external reference for GNAT " &
"Project Files");
Write_Eol;
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;
Write_Str ("Source and Library search path switches:");
Write_Eol;
Write_Str (" -aLdir Skip missing library sources if ali in dir");
Write_Eol;
Write_Str (" -Adir like -aLdir -aIdir");
Write_Eol;
Write_Str (" -aOdir Specify library/object files search path");
Write_Eol;
Write_Str (" -aIdir Specify source files search path");
Write_Eol;
Write_Str (" -Idir Like -aIdir -aOdir");
Write_Eol;
Write_Str (" -I- Don't look for sources & library files");
Write_Str (" in the default directory");
Write_Eol;
Write_Str (" -Ldir Look for program libraries also in dir");
Write_Eol;
Write_Str (" -nostdinc Don't look for sources");
Write_Str (" in the system default directory");
Write_Eol;
Write_Str (" -nostdlib Don't look for library files");
Write_Str (" in the system default directory");
Write_Eol;
Write_Str (" --RTS=dir specify the default source and object search"
& " path");
Write_Eol;
Write_Eol;
Write_Str ("To pass an arbitrary switch to the Compiler, ");
Write_Str ("Binder or Linker:");
Write_Eol;
Write_Str (" -cargs opts opts are passed to the compiler");
Write_Eol;
Write_Str (" -bargs opts opts are passed to the binder");
Write_Eol;
Write_Str (" -largs opts opts are passed to the linker");
Write_Eol;
Write_Str (" -margs opts opts are passed to gnatmake");
Write_Eol;
Usage;
end Makeusg;