diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-02-22 18:38:14 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-02-23 07:27:31 +0100 |
commit | bf7412a68ed3520b62df8561882cc976c9340011 (patch) | |
tree | 09e09147945979430e39797328f6418a23b741d0 /src/grt/grt-vpi.adb | |
parent | 75204b10ffb1f57fd035d8f0c601618b30e4b81a (diff) | |
download | ghdl-bf7412a68ed3520b62df8561882cc976c9340011.tar.gz ghdl-bf7412a68ed3520b62df8561882cc976c9340011.tar.bz2 ghdl-bf7412a68ed3520b62df8561882cc976c9340011.zip |
grt-vpi: add more properties, decode them, fix style.
Diffstat (limited to 'src/grt/grt-vpi.adb')
-rw-r--r-- | src/grt/grt-vpi.adb | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/src/grt/grt-vpi.adb b/src/grt/grt-vpi.adb index 5337f7abb..4e512a01c 100644 --- a/src/grt/grt-vpi.adb +++ b/src/grt/grt-vpi.adb @@ -189,8 +189,20 @@ package body Grt.Vpi is Trace ("vpiFullName"); when vpiSize => Trace ("vpiSize"); + when vpiFile => + Trace ("vpiFile"); + when vpiLineNo => + Trace ("vpiLineNo"); + + when vpiDefName => + Trace ("vpiDefName"); when vpiTimePrecision => Trace ("vpiTimePrecision"); + when vpiDefFile => + Trace ("vpiDefFile"); + + -- Port and net properties + when vpiScalar => Trace ("vpiScalar"); when vpiVector => @@ -200,6 +212,8 @@ package body Grt.Vpi is Trace ("vpiModule"); when vpiNet => Trace ("vpiNet"); + when vpiPort => + Trace ("vpiPort"); when vpiParameter => Trace ("vpiParameter"); when vpiScope => |