comparison gcc/ada/usage.adb @ 145:1830386684a0

gcc-9.2.0
author anatofuz
date Thu, 13 Feb 2020 11:34:05 +0900
parents 84e7813d76e9
children
comparison
equal deleted inserted replaced
131:84e7813d76e9 145:1830386684a0
4 -- -- 4 -- --
5 -- U S A G E -- 5 -- U S A G E --
6 -- -- 6 -- --
7 -- B o d y -- 7 -- B o d y --
8 -- -- 8 -- --
9 -- Copyright (C) 1992-2018, Free Software Foundation, Inc. -- 9 -- Copyright (C) 1992-2019, Free Software Foundation, Inc. --
10 -- -- 10 -- --
11 -- GNAT is free software; you can redistribute it and/or modify it under -- 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- -- 12 -- terms of the GNU General Public License as published by the Free Soft- --
13 -- ware Foundation; either version 3, or (at your option) any later ver- -- 13 -- ware Foundation; either version 3, or (at your option) any later ver- --
14 -- sion. GNAT is distributed in the hope that it will be useful, but WITH- -- 14 -- sion. GNAT is distributed in the hope that it will be useful, but WITH- --
400 400
401 -- Lines for -gnatR switch 401 -- Lines for -gnatR switch
402 402
403 Write_Switch_Char ("R?"); 403 Write_Switch_Char ("R?");
404 Write_Line 404 Write_Line
405 ("List rep info (?=0/1/2/3/e/m for none/types/all/symbolic/ext/mech)"); 405 ("List rep info (?=0/1/2/3/4/e/m for none/types/all/sym/cg/ext/mech)");
406 Write_Switch_Char ("R?j"); 406 Write_Switch_Char ("R?j");
407 Write_Line ("List rep info in the JSON data interchange format"); 407 Write_Line ("List rep info in the JSON data interchange format");
408 Write_Switch_Char ("R?s"); 408 Write_Switch_Char ("R?s");
409 Write_Line ("List rep info to file.rep instead of standard output"); 409 Write_Line ("List rep info to file.rep instead of standard output");
410 410
481 Write_Line (" + indicates warning flag included in -gnatwa"); 481 Write_Line (" + indicates warning flag included in -gnatwa");
482 Write_Line (" a turn on all info/warnings marked below with +"); 482 Write_Line (" a turn on all info/warnings marked below with +");
483 Write_Line (" A turn off all optional info/warnings"); 483 Write_Line (" A turn off all optional info/warnings");
484 Write_Line (" .a*+ turn on warnings for failing assertion"); 484 Write_Line (" .a*+ turn on warnings for failing assertion");
485 Write_Line (" .A turn off warnings for failing assertion"); 485 Write_Line (" .A turn off warnings for failing assertion");
486 Write_Line (" _a*+ turn on warnings for anonymous allocators");
487 Write_Line (" _A turn off warnings for anonymous allocators");
486 Write_Line (" b+ turn on warnings for bad fixed value " & 488 Write_Line (" b+ turn on warnings for bad fixed value " &
487 "(not multiple of small)"); 489 "(not multiple of small)");
488 Write_Line (" B* turn off warnings for bad fixed value " & 490 Write_Line (" B* turn off warnings for bad fixed value " &
489 "(not multiple of small)"); 491 "(not multiple of small)");
490 Write_Line (" .b*+ turn on warnings for biased representation"); 492 Write_Line (" .b*+ turn on warnings for biased representation");