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; |