diff options
author | Nico Huber <nico.huber@secunet.com> | 2015-09-29 16:41:19 +0200 |
---|---|---|
committer | Nico Huber <nico.h@gmx.de> | 2016-09-19 11:14:49 +0200 |
commit | be5492aec0a02e416cf12a7ad7517900540d9991 (patch) | |
tree | 2ca46cf377203c8146378bcc74a0be6317f09ef2 /src/lib/gnat/a-unccon.ads | |
parent | 2e09d2b239ff2dfdba89011fd64d9a07da0d8717 (diff) | |
download | coreboot-be5492aec0a02e416cf12a7ad7517900540d9991.tar.xz |
Add minimal GNAT run time system (RTS)
Add a stripped-down version of libgnat. This is somehow comparable to
libgcc but for Ada programs. It's licensed under GPLv3 but with the
runtime library exception. So it's totally fine to link it with our
GPLv2 code and keep it under GPLv2.
Change-Id: Ie6522abf093f0a516b9ae18ddc69131bd721dc0c
Signed-off-by: Nico Huber <nico.huber@secunet.com>
Signed-off-by: Nico Huber <nico.h@gmx.de>
Reviewed-on: https://review.coreboot.org/11836
Tested-by: build bot (Jenkins)
Reviewed-by: Paul Menzel <paulepanter@users.sourceforge.net>
Reviewed-by: Edward O'Callaghan <edward.ocallaghan@koparo.com>
Diffstat (limited to 'src/lib/gnat/a-unccon.ads')
-rw-r--r-- | src/lib/gnat/a-unccon.ads | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/src/lib/gnat/a-unccon.ads b/src/lib/gnat/a-unccon.ads new file mode 100644 index 0000000000..ffa84d9fad --- /dev/null +++ b/src/lib/gnat/a-unccon.ads @@ -0,0 +1,23 @@ +------------------------------------------------------------------------------ +-- -- +-- GNAT COMPILER COMPONENTS -- +-- -- +-- A D A . U N C H E C K E D _ C O N V E R S I O N -- +-- -- +-- S p e c -- +-- -- +-- This specification is derived from the Ada Reference Manual for use with -- +-- GNAT. In accordance with the copyright of that document, you can freely -- +-- copy and modify this specification, provided that if you redistribute a -- +-- modified version, any changes that you have made are clearly indicated. -- +-- -- +------------------------------------------------------------------------------ + +generic + type Source (<>) is limited private; + type Target (<>) is limited private; + +function Ada.Unchecked_Conversion (S : Source) return Target; + +pragma Pure (Unchecked_Conversion); +pragma Import (Intrinsic, Unchecked_Conversion); |