From c8dbf886e992daca83e878f3397909a0f7a33d93 Mon Sep 17 00:00:00 2001 From: Eric Botcazou Date: Mon, 16 Mar 2015 09:18:38 +0000 Subject: decl.c (gnat_to_gnu_entity): Do not short-circuit the regular handling. * gcc-interface/decl.c (gnat_to_gnu_entity) : Do not short-circuit the regular handling. From-SVN: r221446 --- gcc/ada/gcc-interface/decl.c | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'gcc/ada/gcc-interface/decl.c') diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c index 06031b1..90ffcb3 100644 --- a/gcc/ada/gcc-interface/decl.c +++ b/gcc/ada/gcc-interface/decl.c @@ -4800,9 +4800,11 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, int definition) case E_Abstract_State: /* This is a SPARK annotation that only reaches here when compiling in - ASIS mode and has no characteristics to annotate. */ + ASIS mode. */ gcc_assert (type_annotate_only); - return error_mark_node; + gnu_decl = error_mark_node; + saved = true; + break; default: gcc_unreachable (); -- cgit v1.1