summaryrefslogtreecommitdiff
path: root/src/lib/gnat/a-unccon.ads
diff options
context:
space:
mode:
authorNico Huber <nico.huber@secunet.com>2015-09-29 16:41:19 +0200
committerNico Huber <nico.h@gmx.de>2016-09-19 11:14:49 +0200
commitbe5492aec0a02e416cf12a7ad7517900540d9991 (patch)
tree2ca46cf377203c8146378bcc74a0be6317f09ef2 /src/lib/gnat/a-unccon.ads
parent2e09d2b239ff2dfdba89011fd64d9a07da0d8717 (diff)
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.ads23
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);