summaryrefslogtreecommitdiff
path: root/gcc/ada/s-vxwext-rtp.adb
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2010-10-05 10:22:52 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2010-10-05 10:22:52 +0000
commit5332e689d5776cd2c2b0cb1620030901b3b2ea62 (patch)
treecce67c725ab63ebdc3917a1ca41ada906796082a /gcc/ada/s-vxwext-rtp.adb
parent29ba75419199b96fef81941c6d222a462b72082d (diff)
downloadgcc-5332e689d5776cd2c2b0cb1620030901b3b2ea62.tar.gz
2010-10-05 Robert Dewar <dewar@adacore.com>
* prj-util.adb, prj-util.ads, prj.ads, s-vxwext-rtp.adb, sem_ch4.adb, sem_ch7.adb, sem_res.adb, sem_type.adb: Minor reformatting. Minor code reorganization (use Nkind_In). git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@164981 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-vxwext-rtp.adb')
-rw-r--r--gcc/ada/s-vxwext-rtp.adb6
1 files changed, 4 insertions, 2 deletions
diff --git a/gcc/ada/s-vxwext-rtp.adb b/gcc/ada/s-vxwext-rtp.adb
index 39b7acf4c13..b27238c918b 100644
--- a/gcc/ada/s-vxwext-rtp.adb
+++ b/gcc/ada/s-vxwext-rtp.adb
@@ -60,7 +60,8 @@ package body System.VxWorks.Ext is
function Interrupt_Connect
(Vector : Interrupt_Vector;
Handler : Interrupt_Handler;
- Parameter : System.Address := System.Null_Address) return int is
+ Parameter : System.Address := System.Null_Address) return int
+ is
pragma Unreferenced (Vector, Handler, Parameter);
begin
return ERROR;
@@ -82,7 +83,8 @@ package body System.VxWorks.Ext is
--------------------------------
function Interrupt_Number_To_Vector
- (intNum : int) return Interrupt_Vector is
+ (intNum : int) return Interrupt_Vector
+ is
pragma Unreferenced (intNum);
begin
return 0;