diff options
author | Tristan Gingold <tgingold@free.fr> | 2021-06-06 10:18:00 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2021-06-06 10:18:00 +0200 |
commit | 2cf1465a532c8f089215193a5f9f189f5684eaf0 (patch) | |
tree | 454ef8be3d419af18d59fd12b464ed089bde378d /src/grt/grt-vpi.ads | |
parent | f66524bb94be8ca7850565f5d0346a8aba5c5ea1 (diff) | |
download | ghdl-2cf1465a532c8f089215193a5f9f189f5684eaf0.tar.gz ghdl-2cf1465a532c8f089215193a5f9f189f5684eaf0.tar.bz2 ghdl-2cf1465a532c8f089215193a5f9f189f5684eaf0.zip |
grt: preliminary work to support arrays in vpi
Diffstat (limited to 'src/grt/grt-vpi.ads')
-rw-r--r-- | src/grt/grt-vpi.ads | 29 |
1 files changed, 22 insertions, 7 deletions
diff --git a/src/grt/grt-vpi.ads b/src/grt/grt-vpi.ads index 44be9eefe..187dcbfdd 100644 --- a/src/grt/grt-vpi.ads +++ b/src/grt/grt-vpi.ads @@ -27,8 +27,7 @@ with Grt.Vcd; with Grt.Callbacks; package Grt.Vpi is - - -- Properties, see vpi_user.h + -- Properties and objects, see vpi_user.h vpiUndefined : constant Integer := -1; vpiType : constant Integer := 1; vpiName : constant Integer := 2; @@ -45,11 +44,6 @@ package Grt.Vpi is vpiScalar : constant Integer := 17; vpiVector : constant Integer := 18; - -- object codes, see vpi_user.h - vpiModule : constant Integer := 32; - vpiNet : constant Integer := 36; - vpiPort : constant Integer := 44; - -- vpiDirection : constant Integer := 20; vpiInput : constant Integer := 1; vpiOutput : constant Integer := 2; @@ -57,12 +51,33 @@ package Grt.Vpi is vpiMixedIO : constant Integer := 4; vpiNoDirection : constant Integer := 5; + vpiIntegerVar : constant Integer := 25; + vpiMemory : constant Integer := 29; + vpiModPath : constant Integer := 31; + vpiModule : constant Integer := 32; + vpiNamedEvent : constant Integer := 34; + vpiNet : constant Integer := 36; vpiParameter : constant Integer := 41; + vpiPort : constant Integer := 44; + vpiRealVar : constant Integer := 47; + vpiReg : constant Integer := 48; + vpiTchk : constant Integer := 61; + vpiLeftRange : constant Integer := 79; vpiRightRange : constant Integer := 83; vpiScope : constant Integer := 84; vpiInternalScope : constant Integer := 92; + vpiProcess : constant Integer := 92; + + vpiPrimitive : constant Integer := 103; + vpiAttribute : constant Integer := 105; + vpiPrimitiveArray : constant Integer := 113; + vpiNetArray : constant Integer := 114; + vpiRange : constant Integer := 115; + vpiRegArray : constant Integer := 116; + vpiNamedEventArray : constant Integer := 129; + -- vpi_control constants. vpiStop : constant := 66; vpiFinish : constant := 67; vpiReset : constant := 68; |