diff options
Diffstat (limited to 'translate/grt/grt-avhpi.adb')
| -rw-r--r-- | translate/grt/grt-avhpi.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/translate/grt/grt-avhpi.adb b/translate/grt/grt-avhpi.adb index a5c36e5..a6565cf 100644 --- a/translate/grt/grt-avhpi.adb +++ b/translate/grt/grt-avhpi.adb @@ -31,7 +31,7 @@ package body Grt.Avhpi is begin Res := (Kind => VhpiIteratorK, Ctxt => (Base => Null_Address, - Block => To_Ghdl_Rti_Access (Ghdl_Rti_Top_Ptr)), + Block => To_Ghdl_Rti_Access (Ghdl_Rti_Top'Address)), Rel => VhpiPackInsts, It_Cur => 0, It2 => 0, |