diff options
author | Marlon James <marlon.james@gmail.com> | 2021-03-03 10:33:56 -0800 |
---|---|---|
committer | tgingold <tgingold@users.noreply.github.com> | 2021-03-04 07:49:28 +0100 |
commit | 783cbac7ba4c14aa7e27f28755dccd7e4ee4d54e (patch) | |
tree | 929ab92aac895ec39b5e7780e1fe8cea3edf3be1 /src/ghdldrv | |
parent | a03aedddf650f923b06ebacb441a713930cd63e1 (diff) | |
download | ghdl-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.adb | 16 | ||||
-rw-r--r-- | src/ghdldrv/ghdlvpi.ads | 2 |
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 |