diff options
| author | Tristan Gingold <tgingold@free.fr> | 2022-08-21 14:10:08 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2022-08-21 14:10:08 +0200 |
| commit | 00ca739542639e5de0578bf1e62f04e380772f52 (patch) | |
| tree | 4cf24896c94e2f28ada3528485257c1eab110f85 /src/synth/elab-vhdl_expr.adb | |
| parent | 78b29a7a47636cb2fda1112f3e2ec8167c3e7d66 (diff) | |
| download | ghdl-00ca739542639e5de0578bf1e62f04e380772f52.tar.gz ghdl-00ca739542639e5de0578bf1e62f04e380772f52.tar.bz2 ghdl-00ca739542639e5de0578bf1e62f04e380772f52.zip | |
synth: factorize code for synth_subtype_conversion
Diffstat (limited to 'src/synth/elab-vhdl_expr.adb')
| -rw-r--r-- | src/synth/elab-vhdl_expr.adb | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/synth/elab-vhdl_expr.adb b/src/synth/elab-vhdl_expr.adb index d1b44fe78..391a75c92 100644 --- a/src/synth/elab-vhdl_expr.adb +++ b/src/synth/elab-vhdl_expr.adb @@ -20,7 +20,7 @@ with Types; use Types; with Name_Table; with Str_Table; -with Netlists.Builders; +with Netlists; with Vhdl.Errors; use Vhdl.Errors; with Vhdl.Utils; use Vhdl.Utils; @@ -101,8 +101,7 @@ package body Elab.Vhdl_Expr is Bounds : Boolean; Loc : Node) return Valtyp is begin - return Synth_Subtype_Conversion - (Netlists.Builders.No_Context, Vt, Dtype, Bounds, Loc); + return Synth_Subtype_Conversion (null, Vt, Dtype, Bounds, Loc); end Exec_Subtype_Conversion; function Exec_Value_Attribute (Syn_Inst : Synth_Instance_Acc; Attr : Node) |