Mercurial > hg > CbC > CbC_gcc
comparison gcc/ada/libgnat/system-vxworks7-ppc-rtp-smp.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.x PPC RTP) -- | 8 -- (VxWorks 7.x PPC RTP) -- |
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 -- -- |
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=vxworks-gnat-crtbe-link.spec"); | 123 pragma Linker_Options ("--specs=vxworks7-gnat-crtbe-link.spec"); |
124 -- Pull in crtbegin/crtend objects and register exceptions for ZCX. | 124 -- Pull in crtbegin/crtend objects and register exceptions for ZCX. |
125 -- This is commented out by our Makefile for SJLJ runtimes. | 125 -- This is commented out by our Makefile for SJLJ runtimes. |
126 | 126 |
127 pragma Linker_Options ("--specs=vxworks7-rtp-base-link.spec"); | 127 pragma Linker_Options ("--specs=vxworks7-rtp-base-link.spec"); |
128 -- Define the symbol wrs_rtp_base | 128 -- Define the symbol wrs_rtp_base |