Minor reformatting.
authorArnaud Charlet <charlet@gcc.gnu.org>
Thu, 10 Feb 2005 14:05:21 +0000 (15:05 +0100)
committerArnaud Charlet <charlet@gcc.gnu.org>
Thu, 10 Feb 2005 14:05:21 +0000 (15:05 +0100)
From-SVN: r94829

gcc/ada/vms_conv.adb

index f623727a986f6f98cf06ea1fb2e09f18dfce40a9..ac66690eadcb202647a7a833d2911152548d4508 100644 (file)
@@ -6,7 +6,7 @@
 --                                                                          --
 --                                 B o d y                                  --
 --                                                                          --
---          Copyright (C) 1996-2004 Free Software Foundation, Inc.          --
+--          Copyright (C) 1996-2005 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- --
@@ -89,10 +89,10 @@ package body VMS_Conv is
    --  the allocated result on the heap.
 
    function Is_Extensionless (F : String) return Boolean;
-   --  Returns true if the filename has no extension.
+   --  Returns true if the filename has no extension
 
    function Match (S1, S2 : String) return Boolean;
-   --  Determines whether S1 and S2 match. This is a case insensitive match.
+   --  Determines whether S1 and S2 match (this is a case insensitive match)
 
    function Match_Prefix (S1, S2 : String) return Boolean;
    --  Determines whether S1 matches a prefix of S2. This is also a case
@@ -662,7 +662,7 @@ package body VMS_Conv is
    begin
       Put ("GNAT ");
       Put_Line (Gnatvsn.Gnat_Version_String);
-      Put_Line ("Copyright 1996-2004 Free Software Foundation, Inc.");
+      Put_Line ("Copyright 1996-2005 Free Software Foundation, Inc.");
    end Output_Version;
 
    -----------