aboutsummaryrefslogtreecommitdiffstats
path: root/src/ghdldrv
diff options
context:
space:
mode:
authorMarlon James <marlon.james@gmail.com>2021-03-03 10:33:56 -0800
committertgingold <tgingold@users.noreply.github.com>2021-03-04 07:49:28 +0100
commit783cbac7ba4c14aa7e27f28755dccd7e4ee4d54e (patch)
tree929ab92aac895ec39b5e7780e1fe8cea3edf3be1 /src/ghdldrv
parenta03aedddf650f923b06ebacb441a713930cd63e1 (diff)
downloadghdl-783cbac7ba4c14aa7e27f28755dccd7e4ee4d54e.tar.gz
ghdl-783cbac7ba4c14aa7e27f28755dccd7e4ee4d54e.tar.bz2
ghdl-783cbac7ba4c14aa7e27f28755dccd7e4ee4d54e.zip
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.
Diffstat (limited to 'src/ghdldrv')
-rw-r--r--src/ghdldrv/ghdlvpi.adb16
-rw-r--r--src/ghdldrv/ghdlvpi.ads2
2 files changed, 9 insertions, 9 deletions
diff --git a/src/ghdldrv/ghdlvpi.adb b/src/ghdldrv/ghdlvpi.adb
index 875d6e5ce..35194f3bd 100644
--- a/src/ghdldrv/ghdlvpi.adb
+++ b/src/ghdldrv/ghdlvpi.adb
@@ -1,4 +1,4 @@
--- GHDL driver - compile and link wrappers for VPI.
+-- GHDL driver - compile and link wrappers for VPI and VHPI.
-- Copyright (C) 2016 Tristan Gingold
--
-- This program is free software: you can redistribute it and/or modify
@@ -220,7 +220,7 @@ package body Ghdlvpi is
("--vpi-compile"),
Help_Str => new String'
("--vpi-compile CMD ARGS"
- & ASCII.LF & " Compile with VPI include path"),
+ & ASCII.LF & " Compile with VPI/VHPI include path"),
Extra_Args => Get_Vpi_Cflags'Access));
Register_Command
(new Command_Spawn_Type'
@@ -230,7 +230,7 @@ package body Ghdlvpi is
("--vpi-link"),
Help_Str => new String'
("--vpi-link CMD ARGS"
- & ASCII.LF & " Link with VPI library"),
+ & ASCII.LF & " Link with VPI/VHPI library"),
Extra_Args => Get_Vpi_Ldflags'Access));
Register_Command
@@ -240,7 +240,7 @@ package body Ghdlvpi is
("--vpi-cflags"),
Help_Str => new String'
("--vpi-cflags"
- & ASCII.LF & " Display VPI compile flags"),
+ & ASCII.LF & " Display VPI/VHPI compile flags"),
Flags => Get_Vpi_Cflags'Access));
Register_Command
(new Command_Vpi_Flags'
@@ -249,7 +249,7 @@ package body Ghdlvpi is
("--vpi-ldflags"),
Help_Str => new String'
("--vpi-ldflags"
- & ASCII.LF & " Display VPI link flags"),
+ & ASCII.LF & " Display VPI/VHPI link flags"),
Flags => Get_Vpi_Ldflags'Access));
Register_Command
@@ -259,7 +259,7 @@ package body Ghdlvpi is
("--vpi-include-dir"),
Help_Str => new String'
("--vpi-include-dir"
- & ASCII.LF & " Display VPI include directory"),
+ & ASCII.LF & " Display VPI/VHPI include directory"),
Disp => Get_Vpi_Include_Dir'Access));
Register_Command
(new Command_Str_Disp'
@@ -268,7 +268,7 @@ package body Ghdlvpi is
("--vpi-library-dir"),
Help_Str => new String'
("--vpi-library-dir"
- & ASCII.LF & " Display VPI library directory"),
+ & ASCII.LF & " Display VPI/VHPI library directory"),
Disp => Get_Vpi_Lib_Dir'Access));
Register_Command
(new Command_Str_Disp'
@@ -277,7 +277,7 @@ package body Ghdlvpi is
("--vpi-library-dir-unix"),
Help_Str => new String'
("--vpi-library-dir-unix"
- & ASCII.LF & " Display VPI library directory (unix form)"),
+ & ASCII.LF & " Display VPI/VHPI library directory (unix form)"),
Disp => Get_Vpi_Lib_Dir_Unix'Access));
end Register_Commands;
diff --git a/src/ghdldrv/ghdlvpi.ads b/src/ghdldrv/ghdlvpi.ads
index c1f80f5e6..3cfe2b437 100644
--- a/src/ghdldrv/ghdlvpi.ads
+++ b/src/ghdldrv/ghdlvpi.ads
@@ -1,4 +1,4 @@
--- GHDL driver - compile and link wrappers for VPI.
+-- GHDL driver - compile and link wrappers for VPI and VHPI.
-- Copyright (C) 2016 Tristan Gingold
--
-- This program is free software: you can redistribute it and/or modify