diff options
Diffstat (limited to 'src/synth/synth-files_operations.adb')
| -rw-r--r-- | src/synth/synth-files_operations.adb | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/src/synth/synth-files_operations.adb b/src/synth/synth-files_operations.adb index 98fa6a5b8..52abbd7aa 100644 --- a/src/synth/synth-files_operations.adb +++ b/src/synth/synth-files_operations.adb @@ -28,6 +28,8 @@ with Grt.Stdio; with Vhdl.Annotations; +with Netlists; use Netlists; + with Synth.Objtypes; use Synth.Objtypes; with Synth.Expr; use Synth.Expr; with Synth.Errors; use Synth.Errors; @@ -214,10 +216,11 @@ package body Synth.Files_Operations is return F; end if; - File_Name := Synth_Expression_With_Basetype (Syn_Inst, External_Name); + File_Name := Synth_Expression_With_Basetype + (Syn_Inst, External_Name, No_Net); if Open_Kind /= Null_Node then - Mode := Synth_Expression (Syn_Inst, Open_Kind); + Mode := Synth_Expression (Syn_Inst, Open_Kind, No_Net); File_Mode := Ghdl_I32 (Read_Discrete (Mode)); else case Get_Mode (Decl) is |