diff options
Diffstat (limited to 'src/synth/elab-vhdl_files.adb')
| -rw-r--r-- | src/synth/elab-vhdl_files.adb | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/src/synth/elab-vhdl_files.adb b/src/synth/elab-vhdl_files.adb index c2a8dc35f..8c01c30bf 100644 --- a/src/synth/elab-vhdl_files.adb +++ b/src/synth/elab-vhdl_files.adb @@ -29,9 +29,10 @@ with Grt.Stdio; with Elab.Memtype; use Elab.Memtype; with Elab.Vhdl_Objtypes; use Elab.Vhdl_Objtypes; -with Elab.Vhdl_Expr; use Elab.Vhdl_Expr; with Elab.Vhdl_Errors; use Elab.Vhdl_Errors; +with Synth.Vhdl_Expr; use Synth.Vhdl_Expr; + package body Elab.Vhdl_Files is -- Variables to store the search path. @@ -214,10 +215,10 @@ package body Elab.Vhdl_Files is return F; end if; - File_Name := Exec_Expression_With_Basetype (Syn_Inst, External_Name); + File_Name := Synth_Expression_With_Basetype (Syn_Inst, External_Name); if Open_Kind /= Null_Node then - Mode := Exec_Expression (Syn_Inst, Open_Kind); + Mode := Synth_Expression (Syn_Inst, Open_Kind); File_Mode := Ghdl_I32 (Read_Discrete (Mode)); else case Get_Mode (Decl) is |