(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
This commit is contained in:
parent
d58fb3be42
commit
da15c1cd88
@ -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 --
|
||||
----------
|
||||
|
Loading…
Reference in New Issue
Block a user