diff options
| author | Doug Rupp <rupp@adacore.com> | 2008-08-01 09:39:22 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2008-08-01 09:39:22 +0200 |
| commit | ea062149e2dee867a4c4305c07ef57c74236b298 (patch) | |
| tree | 23389d4e11192480e7a7d50051f848ac08ead351 | |
| parent | 2933820e04ec15a76a023aeef3f742285d2d0656 (diff) | |
| download | gcc-ea062149e2dee867a4c4305c07ef57c74236b298.zip gcc-ea062149e2dee867a4c4305c07ef57c74236b298.tar.gz gcc-ea062149e2dee867a4c4305c07ef57c74236b298.tar.bz2 | |
vms_data.ads: vms_data.ads: New qualfier /MACHINE_CODE_LISTING
2008-08-01 Doug Rupp <rupp@adacore.com>
* vms_data.ads: vms_data.ads: New qualfier /MACHINE_CODE_LISTING
From-SVN: r138467
| -rw-r--r-- | gcc/ada/vms_data.ads | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/gcc/ada/vms_data.ads b/gcc/ada/vms_data.ads index 3270e8f..9f78cf7 100644 --- a/gcc/ada/vms_data.ads +++ b/gcc/ada/vms_data.ads @@ -1745,6 +1745,15 @@ package VMS_Data is -- a body is compiled, the corresponding spec is also listed, along -- with any subunits. + S_GCC_Machine : aliased constant S := "/MACHINE_CODE_LISTING " & + "-source-listing"; + -- /NOMACHINE_CODE_LISTING (D) + -- /MACHINE_CODE_LISTING + -- + -- Cause a full machine code listing of the file to be generated to + -- <filename>.lis. Interspersed source is included if the /DEBUG + -- qualifier is also present. + S_GCC_Mapping : aliased constant S := "/MAPPING_FILE=<" & "-gnatem>"; -- /MAPPING_FILE=file_name @@ -3316,6 +3325,7 @@ package VMS_Data is S_GCC_Length 'Access, S_GCC_List 'Access, S_GCC_Output 'Access, + S_GCC_Machine 'Access, S_GCC_Mapping 'Access, S_GCC_Mess 'Access, S_GCC_Nesting 'Access, |