Mercurial > hg > CbC > CbC_gcc
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"); |