diff options
Diffstat (limited to 'src/synth/elab-vhdl_files.adb')
-rw-r--r-- | src/synth/elab-vhdl_files.adb | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/synth/elab-vhdl_files.adb b/src/synth/elab-vhdl_files.adb index aec343170..a1fb471f1 100644 --- a/src/synth/elab-vhdl_files.adb +++ b/src/synth/elab-vhdl_files.adb @@ -25,6 +25,7 @@ with Vhdl.Utils; use Vhdl.Utils; with Grt.Types; use Grt.Types; with Grt.Vhdl_Types; use Grt.Vhdl_Types; +with Grt.Files; with Grt.Files_Operations; use Grt.Files_Operations; with Grt.Stdio; @@ -224,9 +225,9 @@ package body Elab.Vhdl_Files is else case Get_Mode (Decl) is when Iir_In_Mode => - File_Mode := Read_Mode; + File_Mode := Grt.Files.Read_Mode; when Iir_Out_Mode => - File_Mode := Write_Mode; + File_Mode := Grt.Files.Write_Mode; when others => raise Internal_Error; end case; |