summaryrefslogtreecommitdiff
path: root/gcc/ada/s-tadeca.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/s-tadeca.adb')
-rw-r--r--gcc/ada/s-tadeca.adb12
1 files changed, 6 insertions, 6 deletions
diff --git a/gcc/ada/s-tadeca.adb b/gcc/ada/s-tadeca.adb
index acf479c4359..a32a802ebbe 100644
--- a/gcc/ada/s-tadeca.adb
+++ b/gcc/ada/s-tadeca.adb
@@ -2,14 +2,13 @@
-- --
-- GNU ADA RUN-TIME LIBRARY (GNARL) COMPONENTS --
-- --
--- S Y S T E M . T A S K I N G . A S Y N C _ D E L A Y S . --
--- E N Q U E U E _ C A L E N D A R --
+-- SYSTEM.TASKING.ASYNC_DELAYS.ENQUEUE_CALENDAR --
-- --
-- B o d y --
-- --
--- $Revision: 1.1 $
+-- $Revision$
-- --
--- Copyright (C) 1998-1999 Ada Core Technologies, Inc. --
+-- Copyright (C) 1998-2001 Free Software Foundation, Inc. --
-- --
-- GNARL 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- --
@@ -40,8 +39,9 @@ with System.Task_Primitives.Operations;
with System.Tasking.Initialization;
function System.Tasking.Async_Delays.Enqueue_Calendar
- (T : in Ada.Calendar.Time;
- D : Delay_Block_Access) return Boolean
+ (T : Ada.Calendar.Time;
+ D : Delay_Block_Access)
+ return Boolean
is
use type Ada.Calendar.Time;
begin