diff options
author | Arnaud Charlet <charlet@gcc.gnu.org> | 2010-10-05 11:37:44 +0200 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2010-10-05 11:37:44 +0200 |
commit | 92817e897757f430013104a01dbbaf222f7d950a (patch) | |
tree | 497f5b4a920a207a3da99a885ebca648bd450e5b /gcc/ada/s-vxwext.ads | |
parent | eada5fd1cf4179586b126a4a6cf6a0e1f6e69a01 (diff) | |
download | gcc-92817e897757f430013104a01dbbaf222f7d950a.tar.gz |
[multiple changes]
2010-10-05 Emmanuel Briot <briot@adacore.com>
* prj-env.adb, prj-env.ads (Set_Path): New subprogram.
(Deep_Copy): Removed, not used.
2010-10-05 Javier Miranda <miranda@adacore.com>
* sem_ch3.adb (Add_Internal_Interface_Entities): Code reorganization:
move code that searches in the list of primitives of a tagged type for
the entity that will be overridden by user-defined routines.
* sem_disp.adb (Find_Primitive_Covering_Interface): Move here code
previously located in routine Add_Internal_Interface_Entities.
* sem_disp.ads (Find_Primitive_Covering_Interface): Update documentation
* sem_ch6.adb (New_Overloaded_Entity): Add missing check on
availability of attribute Alias.
2010-10-05 Ed Falis <falis@adacore.com>
* s-taprop-vxworks.adb, s-osinte-vxworks.adb, s-osinte-vxworks.ads,
s-vxwext.ads, s-vxwext-kernel.ads, s-vxwext-rtp.adb, s-vxwext-rtp.ads:
Move definition of intContext to System.OS_Interface.
Add necessary variants in System.VxWorks.Extensions.
2010-10-05 Doug Rupp <rupp@adacore.com>
* s-asthan-vms-alpha.adb: On VMS, a task using
pragma AST_Entry exhibits a memory leak when the task terminates
because the vector allocated for the AST interface is not freed. Fixed
by making the vector a controlled type.
From-SVN: r164972
Diffstat (limited to 'gcc/ada/s-vxwext.ads')
-rw-r--r-- | gcc/ada/s-vxwext.ads | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/gcc/ada/s-vxwext.ads b/gcc/ada/s-vxwext.ads index 1559d7d8e14..f39ccbf3f63 100644 --- a/gcc/ada/s-vxwext.ads +++ b/gcc/ada/s-vxwext.ads @@ -62,6 +62,9 @@ package System.VxWorks.Ext is Parameter : System.Address := System.Null_Address) return int; pragma Import (C, Interrupt_Connect, "intConnect"); + function Interrupt_Context return int; + pragma Import (C, Interrupt_Context, "intContext"); + function Interrupt_Number_To_Vector (intNum : int) return Interrupt_Vector; pragma Import (C, Interrupt_Number_To_Vector, "__gnat_inum_to_ivec"); |