summaryrefslogtreecommitdiff
path: root/gcc/ada/s-traces.ads
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2008-03-26 07:53:37 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2008-03-26 07:53:37 +0000
commit10f9d4c155aabef6b08c49e252153fc2afe215e8 (patch)
tree0bd1bbfdef4f3ae7ee45197d12e28f3908b00b73 /gcc/ada/s-traces.ads
parent47d6e23ccebdb14f013ed5c1b6807f4a65bfd273 (diff)
downloadgcc-10f9d4c155aabef6b08c49e252153fc2afe215e8.tar.gz
* s-proinf-irix-athread.ads, s-vxwork-mips.ads,
s-traces.ads, s-vxwork-arm.ads, s-vxwork-ppc.ads, s-vxwork-sparcv9.ads, s-tasinf-mingw.ads, s-tasinf-linux.ads, s-tasdeb.ads, mlib-tgt.ads, i-cstrin.ads, uintp.adb, g-catiio.adb, s-vmexta.ads, s-trafor-default.ads, s-vxwork-m68k.ads: Minor reformatting. Update comments. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@133590 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-traces.ads')
-rw-r--r--gcc/ada/s-traces.ads18
1 files changed, 9 insertions, 9 deletions
diff --git a/gcc/ada/s-traces.ads b/gcc/ada/s-traces.ads
index 2c6d00984b3..c42cc516820 100644
--- a/gcc/ada/s-traces.ads
+++ b/gcc/ada/s-traces.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 2001-2005 Free Software Foundation, Inc. --
+-- Copyright (C) 2001-2007, 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- --
@@ -43,7 +43,7 @@
-- with the event. Thid procedure is used from within the Runtime to send
-- debug informations.
--- This primitive is overloaded in System.Traces.Tasking and this package.
+-- This primitive is overloaded in System.Traces.Tasking and this package
-- Send_Trace_Info calls Send_Trace, in System.Traces.Send, which is trarget
-- dependent, to send the debug informations to a debugger, stream ..
@@ -52,17 +52,17 @@
-- corresponding Send_Trace_Info procedure. It may be required for some
-- target to modify Send_Trace (eg. VxWorks).
--- To add a new target, just adapt System.Traces.Send to your own purpose.
+-- To add a new target, just adapt System.Traces.Send to your own purposes
package System.Traces is
pragma Preelaborate;
type Trace_T is
(
- -- Events handled.
+ -- Events handled
-- Messages
- --
+
M_Accept_Complete,
M_Select_Else,
M_RDV_Complete,
@@ -70,13 +70,13 @@ package System.Traces is
M_Delay,
-- Errors
- --
+
E_Missed,
E_Timeout,
E_Kill,
-- Waiting events
- --
+
W_Call,
W_Accept,
W_Select,
@@ -89,7 +89,7 @@ package System.Traces is
WT_Completion,
-- Protected objects events
- --
+
PO_Call,
POT_Call,
PO_Run,
@@ -98,7 +98,7 @@ package System.Traces is
PO_Done,
-- Task handling events
- --
+
T_Create,
T_Activate,
T_Abort,