Mercurial > hg > CbC > CbC_gcc
comparison gcc/ada/libgnat/system-vxworks7-ppc64-kernel.ads @ 145:1830386684a0
gcc-9.2.0
| author | anatofuz |
|---|---|
| date | Thu, 13 Feb 2020 11:34:05 +0900 |
| parents | 84e7813d76e9 |
| children |
comparison
equal
deleted
inserted
replaced
| 131:84e7813d76e9 | 145:1830386684a0 |
|---|---|
| 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.x PPC64 Kernel) -- | 8 -- (VxWorks 7.x PPC64 Kernel) -- |
| 9 -- -- | 9 -- -- |
| 10 -- Copyright (C) 1992-2018, Free Software Foundation, Inc. -- | 10 -- Copyright (C) 1992-2019, 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 -- -- |
| 118 | 118 |
| 119 Default_Priority : constant Priority := 122; | 119 Default_Priority : constant Priority := 122; |
| 120 | 120 |
| 121 private | 121 private |
| 122 | 122 |
| 123 pragma Linker_Options ("--specs=vxworks7-gnat-crtbe-link.spec"); | |
| 124 -- Pull in crtbegin/crtend objects and register exceptions for ZCX. | |
| 125 -- This is commented out by our Makefile for SJLJ runtimes. | |
| 126 | |
| 127 type Address is mod Memory_Size; | 123 type Address is mod Memory_Size; |
| 128 Null_Address : constant Address := 0; | 124 Null_Address : constant Address := 0; |
| 129 | 125 |
| 130 -------------------------------------- | 126 -------------------------------------- |
| 131 -- System Implementation Parameters -- | 127 -- System Implementation Parameters -- |