diff options
Diffstat (limited to 'src/grt/grt-vpi.adb')
| -rw-r--r-- | src/grt/grt-vpi.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/grt/grt-vpi.adb b/src/grt/grt-vpi.adb index f1305e1db..6cc34a1c9 100644 --- a/src/grt/grt-vpi.adb +++ b/src/grt/grt-vpi.adb @@ -582,6 +582,9 @@ package body Grt.Vpi is Prop := VhpiFullNameP; when vpiName=> Prop := VhpiNameP; + when vpiType => + Tmpstring2 (1 .. 4) := "???" & NUL; + return To_Ghdl_C_String (Tmpstring2'Address); when others=> dbgPut_Line ("vpi_get_str: undefined property"); return null; |