CVS difference for arm/source/10.mss

Differences between 1.53 and version 1.54
Log of other versions for file arm/source/10.mss

--- arm/source/10.mss	2005/07/10 05:16:24	1.53
+++ arm/source/10.mss	2005/07/12 05:01:18	1.54
@@ -1,10 +1,10 @@
 @Part(10, Root="ada.mss")
 
-@Comment{$Date: 2005/07/10 05:16:24 $}
+@Comment{$Date: 2005/07/12 05:01:18 $}
 @LabeledSection{Program Structure and Compilation Issues}
 
 @Comment{$Source: e:\\cvsroot/ARM/Source/10.mss,v $}
-@Comment{$Revision: 1.53 $}
+@Comment{$Revision: 1.54 $}
 @Comment{Corrigendum changes added, 2000/04/24, RLB}
 
 @begin{Intro}
@@ -226,7 +226,7 @@
 @ChgRef{Version=[2],Kind=[Added],ARef=[AI95-00397-01]}
 @ChgAdded{Version=[2],Text=[An @nt{overriding_indicator} is not allowed in a
 @nt{subprogram_declaration}, @nt{generic_instantiation}, or
-@nt{subprogram_renaming_declaration} which declares a library unit.]}
+@nt{subprogram_renaming_declaration} that declares a library unit.]}
 
 @begin{Reason}
   @ChgRef{Version=[2],Kind=[Added]}
@@ -1185,25 +1185,33 @@
 
 @ChgRef{Version=[2],Kind=[AddedNormal],ARef=[AI95-00262-01]}
 @ChgAdded{Version=[2],Type=[Leading],Text=[A @nt<name> denoting a
-library item that is visible
-only due to being mentioned in @nt<with_clause>s that include the reserved word
-@key<private> shall appear only within]}
+library item that is visible only due to being mentioned in
+one or more @nt<with_clause>s that include the reserved word
+@key<private> shall appear only within:]}
 @begin{Itemize}
 @ChgRef{Version=[2],Kind=[AddedNormal]}
-@ChgAdded{Version=[2],Text=[a private part,]}
+@ChgAdded{Version=[2],Text=[a private part;]}
 
 @ChgRef{Version=[2],Kind=[AddedNormal]}
 @ChgAdded{Version=[2],Text=[a body, but not within the
-@nt<subprogram_specification> of a library subprogram body,]}
+@nt<subprogram_specification> of a library subprogram body;]}
 
 @ChgRef{Version=[2],Kind=[AddedNormal]}
 @ChgAdded{Version=[2],Text=[a private descendant of the unit on which one of these
-@nt<with_clause>s appear, or]}
+@nt<with_clause>s appear; or]}
 
 @ChgRef{Version=[2],Kind=[AddedNormal]}
 @ChgAdded{Version=[2],Text=[a pragma within a context clause.]}
 @end{Itemize}
 
+@begin{Ramification}
+@ChgRef{Version=[2],Kind=[AddedNormal]}
+@ChgAdded{Version=[2],Text=[These rules apply only if all of the
+@nt{with_clause}s that mention the name include the reserved word
+@key{private}. They do not apply if the name is mentioned in any
+@nt{with_clause} that does not include @key{private}.]}
+@end{Ramification}
+
 @begin{Reason}
 @ChgRef{Version=[2],Kind=[AddedNormal]}
 @ChgAdded{Version=[2],Text=[These rules make the library item visible anywhere that
@@ -1277,7 +1285,7 @@
 @begin(Itemize)
 @ChgRef{Version=[2],Kind=[AddedNormal],ARef=[AI95-00217-06]}
 @ChgAdded{Version=[2],Text=[in the @nt{context_clause} for the named
-@nt{library_item}; or]}
+@nt{library_item};]}
 
 @begin{Reason}
 @ChgRef{Version=[2],Kind=[AddedNormal]}

Questions? Ask the ACAA Technical Agent