From: Sergey Rybin Date: Thu, 7 Jul 2005 09:47:42 +0000 (+0200) Subject: vms_data.ads: Add VMS qualifiers for new gnatpp switch --no-separate-is X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=2d43d3fed0c9070978b3b39db4b3f3898cf84b60;p=gcc.git vms_data.ads: Add VMS qualifiers for new gnatpp switch --no-separate-is 2005-07-07 Sergey Rybin * vms_data.ads: Add VMS qualifiers for new gnatpp switch --no-separate-is * gnat_ugn.texi: Add description for new gnatpp option (--no-separate-is) From-SVN: r101701 --- diff --git a/gcc/ada/gnat_ugn.texi b/gcc/ada/gnat_ugn.texi index 74b2c40fce3..45521dcfd3e 100644 --- a/gcc/ada/gnat_ugn.texi +++ b/gcc/ada/gnat_ugn.texi @@ -14892,6 +14892,11 @@ All the VT characters are removed from the comment text. All the HT characters are expanded with the sequences of space characters to get to the next tab stops. +@cindex @option{^--no-separate-is^/NO_SEPARATE_IS^} (@command{gnatpp}) +@item ^--no-separate-is^/NO_SEPARATE_IS^ +Do not place the keyword @code{is} on a separate line in a subprogram body in +case if the specification occupies more then one line. + @end table @ifclear vms diff --git a/gcc/ada/vms_data.ads b/gcc/ada/vms_data.ads index 50ed1ee3ae1..c3678f46c00 100644 --- a/gcc/ada/vms_data.ads +++ b/gcc/ada/vms_data.ads @@ -4662,6 +4662,13 @@ package VMS_Data is -- unless the indentation is set to 1: in that case the default value for -- continuation line indentation is also 1. + S_Pretty_Compact_Is : aliased constant S := "/NO_SEPARATE_IS " & + "--no-separate-is"; + -- /NO_SEPARATE_IS + -- + -- Do not place the IS keyword on a separate line in a subprogram body in + -- case if the specification occupies more then one line. + S_Pretty_Eol : aliased constant S := "/END_OF_LINE=" & "DOS " & "--eol=dos " & @@ -4939,6 +4946,7 @@ package VMS_Data is S_Pretty_All_Prjs 'Access, S_Pretty_Attrib 'Access, S_Pretty_Comments 'Access, + S_Pretty_Compact_Is'Access, S_Pretty_Config 'Access, S_Pretty_Constr 'Access, S_Pretty_Comind 'Access,