summaryrefslogtreecommitdiff
path: root/gcc/ada
diff options
context:
space:
mode:
authorebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>2013-09-18 10:35:53 +0000
committerebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>2013-09-18 10:35:53 +0000
commit760e8c4ebefc1300c0d6838e9d587022571bd0e5 (patch)
treed6f058591c988a59e2b3d0ed02b61558a31ef79e /gcc/ada
parentfae32d6f1d16ed0f7aebe1b623c46a88c46b439f (diff)
downloadgcc-760e8c4ebefc1300c0d6838e9d587022571bd0e5.tar.gz
* gcc-interface/decl.c (gnat_to_gnu_entity) <E_Abstract_State>: New.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@202690 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada')
-rw-r--r--gcc/ada/ChangeLog4
-rw-r--r--gcc/ada/gcc-interface/decl.c6
2 files changed, 10 insertions, 0 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index fb4789cc932..686f62cc863 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,5 +1,9 @@
2013-09-18 Eric Botcazou <ebotcazou@adacore.com>
+ * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Abstract_State>: New.
+
+2013-09-18 Eric Botcazou <ebotcazou@adacore.com>
+
* gcc-interface/trans.c (gigi): Remove dead code.
2013-09-18 Eric Botcazou <ebotcazou@adacore.com>
diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c
index 26342e2a012..456d7ab7ad9 100644
--- a/gcc/ada/gcc-interface/decl.c
+++ b/gcc/ada/gcc-interface/decl.c
@@ -4812,6 +4812,12 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, int definition)
saved = true;
break;
+ case E_Abstract_State:
+ /* This is a SPARK annotation that only reaches here when compiling in
+ ASIS mode and has no characteristics to annotate. */
+ gcc_assert (type_annotate_only);
+ return error_mark_node;
+
default:
gcc_unreachable ();
}