summaryrefslogtreecommitdiff
path: root/gcc/ada/s-gloloc.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/s-gloloc.adb')
-rw-r--r--gcc/ada/s-gloloc.adb4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/s-gloloc.adb b/gcc/ada/s-gloloc.adb
index 17a30df166b..197b4a9abfc 100644
--- a/gcc/ada/s-gloloc.adb
+++ b/gcc/ada/s-gloloc.adb
@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
--- Copyright (C) 1999-2002 Free Software Foundation, Inc. --
+-- Copyright (C) 1999-2006, 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- --
@@ -75,7 +75,7 @@ package body System.Global_Locks is
-- Create_Lock --
-----------------
- procedure Create_Lock (Lock : out Lock_Type; Name : in String) is
+ procedure Create_Lock (Lock : out Lock_Type; Name : String) is
L : Lock_Type;
begin