From: Doug Rupp Date: Fri, 1 Aug 2008 07:39:22 +0000 (+0200) Subject: vms_data.ads: vms_data.ads: New qualfier /MACHINE_CODE_LISTING X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=ea062149e2dee867a4c4305c07ef57c74236b298;p=gcc.git vms_data.ads: vms_data.ads: New qualfier /MACHINE_CODE_LISTING 2008-08-01 Doug Rupp * vms_data.ads: vms_data.ads: New qualfier /MACHINE_CODE_LISTING From-SVN: r138467 --- diff --git a/gcc/ada/vms_data.ads b/gcc/ada/vms_data.ads index 3270e8f55b5..9f78cf72d33 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 + -- .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,