aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2007-08-14 11:03:24 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2007-08-14 11:03:24 +0200
commitda15c1cd888129d937bd2ddaff35803bfbf56676 (patch)
tree159c59d9e7763052adb6a7a010f97770f9c73672 /gcc
parentd58fb3be4284dcbfbf423a8df4fa3736e6f5fb61 (diff)
downloadgcc-da15c1cd888129d937bd2ddaff35803bfbf56676.zip
gcc-da15c1cd888129d937bd2ddaff35803bfbf56676.tar.gz
gcc-da15c1cd888129d937bd2ddaff35803bfbf56676.tar.bz2
(Task_Cont, Task_Stop): New functions, thin binding to the VxWorks routines which have changed between VxWorks 5 and 6.
(Task_Cont, Task_Stop): New functions, thin binding to the VxWorks routines which have changed between VxWorks 5 and 6. (Int_Lock, Int_Unlock): New function, thin binding to kernel routines which are not callable from a RTP. From-SVN: r127473
Diffstat (limited to 'gcc')
-rw-r--r--gcc/ada/s-osinte-vxworks6.ads26
1 files changed, 24 insertions, 2 deletions
diff --git a/gcc/ada/s-osinte-vxworks6.ads b/gcc/ada/s-osinte-vxworks6.ads
index f8a39de..d3a8cbd 100644
--- a/gcc/ada/s-osinte-vxworks6.ads
+++ b/gcc/ada/s-osinte-vxworks6.ads
@@ -6,8 +6,8 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 1991-1994, Florida State University --
--- Copyright (C) 1995-2007, Free Software Foundation, Inc. --
+-- Copyright (C) 1991-1994, Florida State University --
+-- Copyright (C) 1995-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- --
@@ -201,6 +201,28 @@ package System.OS_Interface is
function getpid return t_id;
pragma Inline (getpid);
+ function Task_Stop (tid : t_id) return int;
+ pragma Inline (Task_Stop);
+ -- If we are in the kernel space, continue the task whose t_id is
+ -- given in parameter if it has been stopped previously to be examined
+ -- by the debugger (e.g. by taskStop). It typically maps to taskResume
+ -- on VxWorks 5 and to taskCont on VxWorks 6.
+
+ function Task_Cont (tid : t_id) return int;
+ pragma Inline (Task_Cont);
+ -- If we are in the kernel space, lock interrupts. It typically maps to
+ -- intLock.
+
+ function Int_Lock return int;
+ pragma Inline (Int_Lock);
+ -- If we are in the kernel space, lock interrupts. It typically maps to
+ -- intLock.
+
+ function Int_Unlock return int;
+ pragma Inline (Int_Unlock);
+ -- If we are in the kernel space, unlock interrupts. It typically maps to
+ -- intUnlock.
+
----------
-- Time --
----------