3psoccon.ads, [...]: Files added.

[thirdparty/gcc.git] / gcc / ada / xnmake.adb

diff --git a/gcc/ada/xnmake.adb b/gcc/ada/xnmake.adb
index 32600baa2f651408bef831fefc71b81793ea2720..fc26a0bfd676b3f8310e8fa0f053989670b9f55a 100644 (file)
--- a/gcc/ada/xnmake.adb
+++ b/gcc/ada/xnmake.adb
@@ -6,7 +6,7 @@
 --                                                                          --
 --                                 B o d y                                  --
 --                                                                          --
---          Copyright (C) 1992-2001 Free Software Foundation, Inc.          --
+--          Copyright (C) 1992-2002 Free Software Foundation, Inc.          --
 --                                                                          --
 -- GNAT is free software;  you can  redistribute it  and/or modify it under --
 -- terms of the  GNU General Public License as published  by the Free Soft- --
@@ -91,9 +91,6 @@ procedure XNmake is
 
    wsp   : Pattern := Span (' ' & ASCII.HT);
 
-   --  Note: in following patterns, we break up the word revision to
-   --  avoid RCS getting enthusiastic about updating the reference!
-
    Body_Only : Pattern := BreakX (' ') * X & Span (' ') & "--  body only";
    Spec_Only : Pattern := BreakX (' ') * X & Span (' ') & "--  spec only";
 
@@ -194,8 +191,6 @@ procedure XNmake is
 --  Start of processing for XNmake
 
 begin
-   --  Capture our revision (following line updated by RCS)
-
    Lineno := 0;
    NWidth := 28;
    Anchored_Mode := True;