summaryrefslogtreecommitdiff
path: root/gcc/ada/vms_data.ads
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2009-07-20 12:55:43 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2009-07-20 12:55:43 +0000
commitacecfc91539df33c7fa9f6d8601efb4cb1437bb6 (patch)
treefa9429c3abb0b2200bdc7151416d825424d673a9 /gcc/ada/vms_data.ads
parent7ee315cc1f5557d5c5c2f5fc059744620a34afb8 (diff)
downloadgcc-acecfc91539df33c7fa9f6d8601efb4cb1437bb6.tar.gz
2009-07-20 Robert Dewar <dewar@adacore.com>
* sem_ch13.adb: Minor reformatting * einfo.ads: Minor reformatting Component_Bit_Offset is no longer considered obsolescent 2009-07-20 Nicolas Roche <roche@adacore.com> * a-calend.adb: Redefine time_t as signed integer with same size as Address type. * s-os_lib.ads: Redefine OS_Time as signed integer with same size as Address type * adaint.h: On Windows 64bits declare OS_Time as long long instead of long 2009-07-20 Javier Miranda <miranda@adacore.com> * exp_tss.adb (Init_Proc): Add missing support for non-default C++ constructors that have anonymous access type formals. * sem_res.adb (Resolve_Actuals): Disable checks associated with Ada class-wide arguments in case of imported C++ subprograms. * exp_ch3.adb (Build_Initialization_Call): Add assertion. 2009-07-20 Sergey Rybin <rybin@adacore.com> * vms_data.ads: Update qualifiers. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@149810 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/vms_data.ads')
-rw-r--r--gcc/ada/vms_data.ads9
1 files changed, 9 insertions, 0 deletions
diff --git a/gcc/ada/vms_data.ads b/gcc/ada/vms_data.ads
index b4ee226c673..9302175f37b 100644
--- a/gcc/ada/vms_data.ads
+++ b/gcc/ada/vms_data.ads
@@ -6556,6 +6556,14 @@ package VMS_Data is
--
-- Avoid raising PROGRAM_ERROR in the generated program unit stubs.
+ S_Stub_No_Head : aliased constant S := "/NO_LOCAL_HEADER " &
+ "--no-local-header";
+ -- /NONO_LOCAL_HEADER (D)
+ -- /NO_LOCAL_HEADER
+ --
+ -- Do not put local comment header before body stub for a local progran
+ -- unit
+
S_Stub_Output : aliased constant S := "/OUTPUT=@" &
"-o@";
-- /OUTPUT=filespec
@@ -6653,6 +6661,7 @@ package VMS_Data is
S_Stub_Output 'Access,
S_Stub_Project 'Access,
S_Stub_No_Exc 'Access,
+ S_Stub_No_Head 'Access,
S_Stub_Quiet 'Access,
S_Stub_Search 'Access,
S_Stub_Subdirs 'Access,