summaryrefslogtreecommitdiff
path: root/gcc/ada/5zinterr.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/5zinterr.adb')
-rw-r--r--gcc/ada/5zinterr.adb4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/5zinterr.adb b/gcc/ada/5zinterr.adb
index 5e428f26c08..e7422ef614b 100644
--- a/gcc/ada/5zinterr.adb
+++ b/gcc/ada/5zinterr.adb
@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
--- $Revision: 1.7 $
+-- $Revision: 1.1 $
-- --
-- Copyright (C) 1991-2001 Free Software Foundation, Inc. --
-- --
@@ -1494,7 +1494,7 @@ package body System.Interrupts is
-- (Abort_Task_Interrupt) from the Interrupt_Manager for unbinding
-- a procedure handler or an entry. Or it could be a wake up
-- from status change (Unblocked -> Blocked). If that is not
- -- the case, we should excecute the attached procedure or entry.
+ -- the case, we should execute the attached procedure or entry.
POP.Unlock (Self_ID);