diff options
| author | Tristan Gingold <tgingold@free.fr> | 2014-06-14 17:34:15 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2014-06-14 17:34:15 +0200 |
| commit | 86af8ab7aa5f56ce5636eb6b8d48b03d52b415eb (patch) | |
| tree | 2098dddb7632a1819ff5c50c80cd66cc43df3914 /translate/ghdldrv/ghdlrun.adb | |
| parent | dd88ae7e34c2d33c0afae482f022dbdb08f59c72 (diff) | |
| download | ghdl-86af8ab7aa5f56ce5636eb6b8d48b03d52b415eb.tar.gz ghdl-86af8ab7aa5f56ce5636eb6b8d48b03d52b415eb.tar.bz2 ghdl-86af8ab7aa5f56ce5636eb6b8d48b03d52b415eb.zip | |
configuration: add Check_Entity_Declaration_Top from translation.
evaluation: add Get_Path_Instance_Name_Suffix from translation.
grt-signals: rename ghdl_signal_direct_driver to ghdl_signal_add_direct_driver.
add ghdl_signal_direct_assign; make active_chain private.
Diffstat (limited to 'translate/ghdldrv/ghdlrun.adb')
| -rw-r--r-- | translate/ghdldrv/ghdlrun.adb | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/translate/ghdldrv/ghdlrun.adb b/translate/ghdldrv/ghdlrun.adb index fb05df789..7dbce3ded 100644 --- a/translate/ghdldrv/ghdlrun.adb +++ b/translate/ghdldrv/ghdlrun.adb @@ -304,13 +304,10 @@ package body Ghdlrun is Def (Trans_Decls.Ghdl_Now, Grt.Types.Current_Time'Address); - Def (Trans_Decls.Ghdl_Signal_Active_Chain, - Grt.Signals.Ghdl_Signal_Active_Chain'Address); - Def (Trans_Decls.Ghdl_Process_Add_Driver, Grt.Signals.Ghdl_Process_Add_Driver'Address); - Def (Trans_Decls.Ghdl_Signal_Direct_Driver, - Grt.Signals.Ghdl_Signal_Direct_Driver'Address); + Def (Trans_Decls.Ghdl_Signal_Add_Direct_Driver, + Grt.Signals.Ghdl_Signal_Add_Direct_Driver'Address); Def (Trans_Decls.Ghdl_Signal_Add_Source, Grt.Signals.Ghdl_Signal_Add_Source'Address); @@ -366,6 +363,9 @@ package body Ghdlrun is Def (Trans_Decls.Ghdl_Signal_Start_Assign_Null, Grt.Signals.Ghdl_Signal_Start_Assign_Null'Address); + Def (Trans_Decls.Ghdl_Signal_Direct_Assign, + Grt.Signals.Ghdl_Signal_Direct_Assign'Address); + Def (Trans_Decls.Ghdl_Create_Signal_B2, Grt.Signals.Ghdl_Create_Signal_B2'Address); Def (Trans_Decls.Ghdl_Signal_Init_B2, |