From 48448a12ef628218db298d8b7c6879e28cdd019a Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Tue, 17 Dec 2013 06:25:53 +0100
Subject: Sync tree: add parsing of AMS-VHDL, add Darwin syntax in asm files.

---
 sem_expr.adb | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'sem_expr.adb')

diff --git a/sem_expr.adb b/sem_expr.adb
index 2293e0a38..f008a7bbc 100644
--- a/sem_expr.adb
+++ b/sem_expr.adb
@@ -189,6 +189,8 @@ package body Sem_Expr is
            | Iir_Kind_Allocator_By_Subtype
            | Iir_Kind_Qualified_Expression =>
             return Expr;
+         when Iir_Kinds_Quantity_Declaration =>
+            return Expr;
          when Iir_Kinds_Dyadic_Operator
            | Iir_Kinds_Monadic_Operator =>
             return Expr;
@@ -683,7 +685,6 @@ package body Sem_Expr is
       end if;
    end Get_Discrete_Range_Staticness;
 
-
    procedure Set_Function_Call_Staticness (Expr : Iir; Imp : Iir)
    is
       Staticness : Iir_Staticness;
@@ -3479,6 +3480,8 @@ package body Sem_Expr is
               | Iir_Kind_Iterator_Declaration
               | Iir_Kind_Guard_Signal_Declaration =>
                return;
+            when Iir_Kinds_Quantity_Declaration =>
+               return;
             when Iir_Kind_File_Declaration
               | Iir_Kind_File_Interface_Declaration =>
                --  LRM 4.3.2  Interface declarations
-- 
cgit v1.2.3