Mercurial > hg > CbC > CbC_gcc
comparison gcc/ada/libgnat/system-vxworks7-x86-kernel.ads @ 131:84e7813d76e9
gcc-8.2
author | mir3636 |
---|---|
date | Thu, 25 Oct 2018 07:37:49 +0900 |
parents | 04ced10e8804 |
children | 1830386684a0 |
comparison
equal
deleted
inserted
replaced
111:04ced10e8804 | 131:84e7813d76e9 |
---|---|
5 -- S Y S T E M -- | 5 -- S Y S T E M -- |
6 -- -- | 6 -- -- |
7 -- S p e c -- | 7 -- S p e c -- |
8 -- (VxWorks 7 Kernel Version x86) -- | 8 -- (VxWorks 7 Kernel Version x86) -- |
9 -- -- | 9 -- -- |
10 -- Copyright (C) 1992-2017, Free Software Foundation, Inc. -- | 10 -- Copyright (C) 1992-2018, Free Software Foundation, Inc. -- |
11 -- -- | 11 -- -- |
12 -- This specification is derived from the Ada Reference Manual for use with -- | 12 -- This specification is derived from the Ada Reference Manual for use with -- |
13 -- GNAT. The copyright notice above, and the license provisions that follow -- | 13 -- GNAT. The copyright notice above, and the license provisions that follow -- |
14 -- apply solely to the contents of the part following the private keyword. -- | 14 -- apply solely to the contents of the part following the private keyword. -- |
15 -- -- | 15 -- -- |
116 | 116 |
117 Default_Priority : constant Priority := 122; | 117 Default_Priority : constant Priority := 122; |
118 | 118 |
119 private | 119 private |
120 | 120 |
121 pragma Linker_Options ("--specs=vxworks-gnat-crtbe-link.spec"); | 121 pragma Linker_Options ("--specs=vxworks7-gnat-crtbe-link.spec"); |
122 -- Pull in crtbegin/crtend objects and register exceptions for ZCX. | 122 -- Pull in crtbegin/crtend objects and register exceptions for ZCX. |
123 -- This is commented out by our Makefile for SJLJ runtimes. | 123 -- This is commented out by our Makefile for SJLJ runtimes. |
124 | 124 |
125 type Address is mod Memory_Size; | 125 type Address is mod Memory_Size; |
126 Null_Address : constant Address := 0; | 126 Null_Address : constant Address := 0; |