From 783cbac7ba4c14aa7e27f28755dccd7e4ee4d54e Mon Sep 17 00:00:00 2001
From: Marlon James <marlon.james@gmail.com>
Date: Wed, 3 Mar 2021 10:33:56 -0800
Subject: VHPI: add initial minimal implementation

Minimal implementation of VHPI provides library loading and
error support. Calling most vhpi_* functions will raise a
VHPI error condition.

Incorporates VHPI thunks into libghdlvpi for linking.
---
 scripts/windows/mcode/compile.bat     | 3 +++
 scripts/windows/mcode/grt-modules.adb | 2 ++
 2 files changed, 5 insertions(+)

(limited to 'scripts/windows/mcode')

diff --git a/scripts/windows/mcode/compile.bat b/scripts/windows/mcode/compile.bat
index 9a1825e46..2e50f624a 100644
--- a/scripts/windows/mcode/compile.bat
+++ b/scripts/windows/mcode/compile.bat
@@ -10,6 +10,9 @@ if errorlevel 1 goto failed
 gcc -c %CFLAGS% ../../../src/grt/grt-cvpi.c
 if errorlevel 1 goto failed
 
+gcc -c %CFLAGS% ../../../src/grt/grt-cvhpi.c
+if errorlevel 1 goto failed
+
 gcc -c %CFLAGS% ../../../src/grt/config/clock.c
 if errorlevel 1 goto failed
 
diff --git a/scripts/windows/mcode/grt-modules.adb b/scripts/windows/mcode/grt-modules.adb
index bbe36e7a9..70f7fca04 100644
--- a/scripts/windows/mcode/grt-modules.adb
+++ b/scripts/windows/mcode/grt-modules.adb
@@ -16,6 +16,7 @@
 with System.Storage_Elements; --  Work around GNAT bug.
 with Grt.Vcd;
 with Grt.Vpi;
+with Grt.Vhpi;
 with Grt.Waves;
 with Grt.Vital_Annotate;
 with Grt.Disp_Tree;
@@ -30,6 +31,7 @@ package body Grt.Modules is
       Grt.Vcd.Register;
       Grt.Waves.Register;
       Grt.Vpi.Register;
+      Grt.Vhpi.Register;
       Grt.Vital_Annotate.Register;
       Grt.Disp_Rti.Register;
       Grt.Backtraces.Register;
-- 
cgit v1.2.3