From ad37a1484212c80764ba3101f07e1d995fd11ad4 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sat, 23 Feb 2019 07:27:47 +0100
Subject: Partial revert of #753.

---
 src/grt/grt-vpi.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/grt/grt-vpi.adb b/src/grt/grt-vpi.adb
index 4e512a01c..331694a34 100644
--- a/src/grt/grt-vpi.adb
+++ b/src/grt/grt-vpi.adb
@@ -544,7 +544,7 @@ package body Grt.Vpi is
             begin
                Get_Verilog_Wire (Res, Info);
                if Info.Vtype /= Vcd_Bad then
-                  return vpiPort;
+                  return vpiNet;
                end if;
             end;
          when VhpiSigDeclK =>
-- 
cgit v1.2.3