diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-10-10 10:53:30 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-10-10 10:53:30 +0000 |
| commit | e163cac84b1f7517e5b0087f65eb1e8eeb74c824 (patch) | |
| tree | 5362afd7bb818177361b88ce362aa0381bde51bf /gcc/ada/s-vxwork-arm.ads | |
| parent | 1eba07db66478e11b3bed77a0f416c4fabd26f0b (diff) | |
| download | gcc-e163cac84b1f7517e5b0087f65eb1e8eeb74c824.tar.gz | |
2013-10-10 Bob Duff <duff@adacore.com>
* gnat_ugn.texi: Add gnat2xml doc.
2013-10-10 Doug Rupp <rupp@adacore.com>
* s-vxwork-arm.ads: Fix interface to FP_CONTEXT.
2013-10-10 Ed Schonberg <schonberg@adacore.com>
* sem_ch13.adb (Analyze_Aspect_Specification): An aspect Import
on a variable need not have a convention specified, as long as
the implicit convention of the object, obtained from its type,
is Ada or Ada-related.
2013-10-10 Robert Dewar <dewar@adacore.com>
* cstand.adb (Standard_Unsigned_64): New internal type.
* gnat_rm.texi: Update documentation on To_Address.
* sem_attr.adb (Analyze_Attribute, case To_Address): Fix
problem with out of range static values given as literals or
named numbers.
* stand.ads (Standard_Unsigned_64): New internal type.
* stand.adb: Minor reformatting.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@203346 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-vxwork-arm.ads')
| -rw-r--r-- | gcc/ada/s-vxwork-arm.ads | 19 |
1 files changed, 17 insertions, 2 deletions
diff --git a/gcc/ada/s-vxwork-arm.ads b/gcc/ada/s-vxwork-arm.ads index 1aa6670e164..8c4cf7e53e2 100644 --- a/gcc/ada/s-vxwork-arm.ads +++ b/gcc/ada/s-vxwork-arm.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1998-2009, Free Software Foundation, Inc. -- +-- Copyright (C) 1998-2013, 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- -- @@ -31,15 +31,30 @@ -- This is the ARM VxWorks version of this package +with Interfaces.C; + package System.VxWorks is pragma Preelaborate (System.VxWorks); + package IC renames Interfaces.C; + -- Floating point context record. ARM version + FP_SGPR_NUM_REGS : constant := 32; + type Fpr_Sgpr_Array is array (1 .. FP_SGPR_NUM_REGS) of IC.unsigned; + -- The record definition below matches what arch/arm/fppArmLib.h says type FP_CONTEXT is record - Dummy : Integer; + fpsid : IC.unsigned; -- system ID register + fpscr : IC.unsigned; -- status and control register + fpexc : IC.unsigned; -- exception register + fpinst : IC.unsigned; -- instruction register + fpinst2 : IC.unsigned; -- instruction register 2 + mfvfr0 : IC.unsigned; -- media and VFP feature Register 0 + mfvfr1 : IC.unsigned; -- media and VFP feature Register 1 + pad : IC.unsigned; + vfp_gpr : Fpr_Sgpr_Array; end record; for FP_CONTEXT'Alignment use 4; |