diff options
Diffstat (limited to 'src/vhdl/libghdl/libghdl.adb')
-rw-r--r-- | src/vhdl/libghdl/libghdl.adb | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/src/vhdl/libghdl/libghdl.adb b/src/vhdl/libghdl/libghdl.adb index 51cd0dd02..4ab3dc74a 100644 --- a/src/vhdl/libghdl/libghdl.adb +++ b/src/vhdl/libghdl/libghdl.adb @@ -103,10 +103,12 @@ package body Libghdl is Ghdllocal.Exec_Prefix := new String'(Prefix (1 .. Len)); end Set_Exec_Prefix; + procedure Set_Hooks_For_Analysis is + begin + Ghdllocal.Compile_Init; + Set_Hooks; + end Set_Hooks_For_Analysis; + Gnat_Version : constant String := "unknown compiler version" & ASCII.NUL; pragma Export (C, Gnat_Version, "__gnat_version"); -begin - -- TODO: set program name. - Ghdllocal.Compile_Init; - Set_Hooks; end Libghdl; |