From 8a36a0ccd84d73e8bfb5989be1510536b73b9df9 Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Thu, 27 May 2004 15:09:26 +0200 Subject: [multiple changes] 2004-05-27 Vincent Celier * vms_data.ads: Add new GNAT PRETTY qualifiers /NO_BACKUP and COMMENTS_LAYOUT=UNTOUCHED * symbols-vms.adb, symbols-vms-alpha.adb: Renamed symbols-vms.adb to symbols-vms-alpha.adb 2004-05-27 Thomas Quinot * sem.ads: Clarify documentation on checks suppression. * einfo.ads (Is_Known_Non_Null): Minor comment typo fix and rephrasing. 2004-05-27 Ed Schonberg * sem_util.adb (Is_Descendent_Of): Examine properly all ancestors in the case of multiple derivations. (Is_Object_Reference): For a selected component, verify that the prefix is itself an object and not a value. * sem_ch12.adb (Same_Instantiated_Constant): New name for Same_Instantiated_Entity. (Same_Instantiated_Variable): Subsidiary to Check_Formal_Package_Instance, to recognize actuals for in-out generic formals that are obtained from a previous formal package. (Instantiate_Subprogram_Body): Emit proper error when generating code and the proper body of a stub is missing. * sem_ch4.adb (Remove_Address_Interpretations): If the operation still has a universal interpretation, do the disambiguation here. * exp_ch4.adb (Expand_N_Type_Conversion, Expand_N_Unchecked_Type_Conversion): Special handling when target type is Address, to avoid typing anomalies when Address is a visible integer type. * exp_ch6.adb (Expand_N_Subprogram_Body): Use Is_Descendent_Of_Address to determine whether a subprogram should not be marked Pure, even when declared in a pure package. 2004-05-27 Jose Ruiz * gnat_ugn.texi: Replace pragma Ravenscar by pragma Profile. * gnat_rm.texi: Replace Max_Entry_Queue_Depth by Max_Entry_Queue_Length Document No_Dynamic_Attachment, that supersedes No_Dynamic_Interrupts. Update the documentation about the Ravenscar profile, following the definition found in AI-249. * sem_prag.adb: Use FIFO_Within_Priorities and Ceiling_Locking when setting the Profile (Ravenscar). This must be done in addition to setting the required restrictions. * rtsfind.ads: Add the set of operations defined in package Ada.Interrupts. * exp_ch6.adb: Check whether we are violating the No_Dynamic_Attachment restriction. 2004-05-27 Eric Botcazou lang-specs.h: Always require -c or -S and always redirect to /dev/null if -gnatc or -gnats is passed. 2004-05-27 Hristian Kirtchev * sem_prag.adb (Sig_Flags): A Pragma_Unchecked_Union does not count as a significant reference. Warnings are now properly emitted when a discriminated type is not referenced. * lib-xref.adb (Generate_Reference): A deferred constant completion, record representation clause or record type discriminant does not produce a reference to its corresponding entity. Warnings are now properly emitted when deferred constants and record types are not referenced. 2004-05-27 Geert Bosch * Makefile.in: Use long version of libm routines on ia64 gnu/linux. Fixes ACATS Annex G tests. 2004-05-27 Robert Dewar * rtsfind.adb (RTU_Loaded): Temporary kludge to get past bug of not handling WITH 2004-05-27 Arnaud Charlet * s-interr.adb (Server_Task): Take into account case of early return from sigwait under e.g. linux. 2004-05-27 Sergey Rybin * gnat_ugn.texi: Add description for the new gnatpp options: -rnb - replace the original source without creating its backup copy -c0 - do not format comments From-SVN: r82324 --- gcc/ada/vms_data.ads | 30 ++++++++++++++++++++++-------- 1 file changed, 22 insertions(+), 8 deletions(-) (limited to 'gcc/ada/vms_data.ads') diff --git a/gcc/ada/vms_data.ads b/gcc/ada/vms_data.ads index ca621b0..df0211d 100644 --- a/gcc/ada/vms_data.ads +++ b/gcc/ada/vms_data.ads @@ -4246,6 +4246,8 @@ package VMS_Data is -- UPPER_CASE S_Pretty_Comments : aliased constant S := "/COMMENTS_LAYOUT=" & + "UNTOUCHED " & + "-c0 " & "DEFAULT " & "-c1 " & "STANDARD_INDENT " & @@ -4256,17 +4258,20 @@ package VMS_Data is "-c4"; -- /COMMENTS_LAYOUT[=layout-option, layout-option, ...] -- - -- Set the comment layout. By default, comments use the GNAT style comment - -- line indentation. - -- layout-option may be one of the following: + -- Set the comment layout. By default, comments use the GNAT style + -- comment line indentation. -- + -- layout-option is be one of the following: + -- + -- UNTOUCHED           All the comments remain unchanged -- DEFAULT (D) GNAT style comment line indentation -- STANDARD_INDENT Standard comment line indentation -- GNAT_BEGINNING GNAT style comment beginning -- REFORMAT Reformat comment blocks -- -- All combinations of layout options are allowed, except for DEFAULT - -- and STANDARD_INDENT which are mutually exclusive. + -- and STANDARD_INDENT which are mutually exclusive, and also if + -- UNTOUCHED is specified, this must be the only option. -- -- The difference between "GNAT style comment line indentation" and -- "standard comment line indentation" is the following: for standard @@ -4492,6 +4497,13 @@ package VMS_Data is -- -- MIXED_CASE Names are in mixed case. + S_Pretty_No_Backup : aliased constant S := "/NO_BACKUP " & + "-rnb"; + -- /REPLACE_NO_BACKUP + -- + -- Replace the argument source with the pretty-printed source without + -- creating any backup copy of the argument source. + S_Pretty_No_Labels : aliased constant S := "/NO_MISSED_LABELS " & "-e"; -- /NO_MISSED_LABELS @@ -4533,7 +4545,8 @@ package VMS_Data is "LOWER_CASE " & "-pL " & "UPPER_CASE " & - -- /PRAGMA_CASING[=pragma-option] + "-pU"; + -- /PRAGMA_CASING[=pragma-option] -- -- Set the case of pragma identifiers. The default is Mixed case. -- pragma-option may be one of the following: @@ -4541,9 +4554,9 @@ package VMS_Data is -- MIXED_CASE (D) -- LOWER_CASE -- UPPER_CASE - "-pU"; - S_Pretty_Project : aliased constant S := "/PROJECT_FILE=<" & - "-P>"; + + S_Pretty_Project : aliased constant S := "/PROJECT_FILE=<" & + "-P>"; -- /PROJECT_FILE=filename -- -- Specifies the main project file to be used. The project files rooted @@ -4621,6 +4634,7 @@ package VMS_Data is S_Pretty_Maxind 'Access, S_Pretty_Mess 'Access, S_Pretty_Names 'Access, + S_Pretty_No_Backup 'Access, S_Pretty_No_Labels 'Access, S_Pretty_Notabs 'Access, S_Pretty_Output 'Access, -- cgit v1.1