summaryrefslogtreecommitdiff
path: root/gcc/ada/s-valuti.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/s-valuti.adb')
-rw-r--r--gcc/ada/s-valuti.adb5
1 files changed, 2 insertions, 3 deletions
diff --git a/gcc/ada/s-valuti.adb b/gcc/ada/s-valuti.adb
index 470f8a9c684..07f067b79cc 100644
--- a/gcc/ada/s-valuti.adb
+++ b/gcc/ada/s-valuti.adb
@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
--- Copyright (C) 1992-2002, Free Software Foundation, Inc. --
+-- Copyright (C) 1992-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- --
@@ -83,8 +83,7 @@ package body System.Val_Util is
(Str : String;
Ptr : access Integer;
Max : Integer;
- Real : Boolean := False)
- return Integer
+ Real : Boolean := False) return Integer
is
P : Natural := Ptr.all;
M : Boolean;