diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2005-02-10 15:05:21 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2005-02-10 15:05:21 +0100 |
| commit | 537f4eb35d1fa192c85ea5dc8335ecabc0024bae (patch) | |
| tree | f5708bc9bd3d18ea096ca4f1d4d1e4e66a38e0c8 | |
| parent | f5faf9de3277a96a9ecc60f32bfa81fb543b272e (diff) | |
| download | gcc-537f4eb35d1fa192c85ea5dc8335ecabc0024bae.zip gcc-537f4eb35d1fa192c85ea5dc8335ecabc0024bae.tar.gz gcc-537f4eb35d1fa192c85ea5dc8335ecabc0024bae.tar.bz2 | |
Minor reformatting.
From-SVN: r94829
| -rw-r--r-- | gcc/ada/vms_conv.adb | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/ada/vms_conv.adb b/gcc/ada/vms_conv.adb index f623727..ac66690 100644 --- a/gcc/ada/vms_conv.adb +++ b/gcc/ada/vms_conv.adb @@ -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; ----------- |