diff options
| author | Fahim | 2015-08-14 17:43:46 +0530 |
|---|---|---|
| committer | Fahim | 2015-08-14 17:43:46 +0530 |
| commit | ddb01dcab87a6179d20d7de76550a61c5f7db7d8 (patch) | |
| tree | 3daa0da40759f937855b413c836edc4b1917aed6 /src/ghdlserver/Vhpi_Package.vhdl | |
| parent | 31834c1879c87d40a92e9023586e6a6b9a699bf6 (diff) | |
| parent | 5701df61772ab92c53b07cf7a6add1138b40bcf1 (diff) | |
| download | nghdl-ddb01dcab87a6179d20d7de76550a61c5f7db7d8.tar.gz nghdl-ddb01dcab87a6179d20d7de76550a61c5f7db7d8.tar.bz2 nghdl-ddb01dcab87a6179d20d7de76550a61c5f7db7d8.zip | |
Merge pull request #11 from ambikeshwar1991/master
Changes for flexible client server port no.
Diffstat (limited to 'src/ghdlserver/Vhpi_Package.vhdl')
| -rwxr-xr-x | src/ghdlserver/Vhpi_Package.vhdl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/ghdlserver/Vhpi_Package.vhdl b/src/ghdlserver/Vhpi_Package.vhdl index febc00b..0c0baac 100755 --- a/src/ghdlserver/Vhpi_Package.vhdl +++ b/src/ghdlserver/Vhpi_Package.vhdl @@ -8,7 +8,7 @@ package Vhpi_Foreign is ----------------------------------------------------------------------------- -- foreign Vhpi function ----------------------------------------------------------------------------- - procedure Vhpi_Initialize; + procedure Vhpi_Initialize(sock_port : in integer); attribute foreign of Vhpi_Initialize : procedure is "VHPIDIRECT Vhpi_Initialize"; procedure Vhpi_Close; -- close . @@ -36,7 +36,7 @@ package body Vhpi_Foreign is ----------------------------------------------------------------------------- -- subprogram bodies for foreign vhpi routines. will never be called ----------------------------------------------------------------------------- - procedure Vhpi_Initialize is + procedure Vhpi_Initialize(sock_port: in integer) is begin assert false report "fatal: this should never be called" severity failure; end Vhpi_Initialize; |