diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-04-17 07:24:13 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-04-17 07:24:13 +0200 |
commit | 465b041e9f81de03f3679b34184c175450f5f5ca (patch) | |
tree | d020acaa7fd8cbaf9cfc2a2f02f70ba94b33bd60 /src/synth/synth-expr.adb | |
parent | 8346c7123271b373218911593033c23db00151cf (diff) | |
download | ghdl-465b041e9f81de03f3679b34184c175450f5f5ca.tar.gz ghdl-465b041e9f81de03f3679b34184c175450f5f5ca.tar.bz2 ghdl-465b041e9f81de03f3679b34184c175450f5f5ca.zip |
synth-expr: handle parenthesis_expression. Fix #1234
Diffstat (limited to 'src/synth/synth-expr.adb')
-rw-r--r-- | src/synth/synth-expr.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/synth/synth-expr.adb b/src/synth/synth-expr.adb index 5125e2ee8..420dad946 100644 --- a/src/synth/synth-expr.adb +++ b/src/synth/synth-expr.adb @@ -1940,6 +1940,9 @@ package body Synth.Expr is return Synth.Aggr.Synth_Aggregate (Syn_Inst, Expr, Expr_Type); when Iir_Kind_Simple_Aggregate => return Synth_Simple_Aggregate (Syn_Inst, Expr); + when Iir_Kind_Parenthesis_Expression => + return Synth_Expression_With_Type + (Syn_Inst, Get_Expression (Expr), Expr_Type); when Iir_Kind_Left_Array_Attribute => declare B : Bound_Type; |