aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/sem_psl.adb
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2016-03-19 14:05:50 +0100
committerTristan Gingold <tgingold@free.fr>2016-03-20 09:13:29 +0100
commit4f650ed4dae4d764de1b294daf947d47d39c98e2 (patch)
tree0365d5ef15cb6045ea879d8d638217871e0171f1 /src/vhdl/sem_psl.adb
parent377762204612fdec51e361e5f3f3a75c67a36552 (diff)
downloadghdl-4f650ed4dae4d764de1b294daf947d47d39c98e2.tar.gz
ghdl-4f650ed4dae4d764de1b294daf947d47d39c98e2.tar.bz2
ghdl-4f650ed4dae4d764de1b294daf947d47d39c98e2.zip
wip.
Diffstat (limited to 'src/vhdl/sem_psl.adb')
-rw-r--r--src/vhdl/sem_psl.adb4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/vhdl/sem_psl.adb b/src/vhdl/sem_psl.adb
index 98e258359..280b0d90b 100644
--- a/src/vhdl/sem_psl.adb
+++ b/src/vhdl/sem_psl.adb
@@ -164,7 +164,9 @@ package body Sem_Psl is
when N_Sequence_Declaration =>
Res := Create_Node (N_Sequence_Instance);
when N_Endpoint_Declaration =>
- Res := Create_Node (N_Endpoint_Instance);
+ -- Endpoints are considered as boolean variables.
+ Free_Node (N);
+ return Convert_Bool (Name);
when N_Property_Declaration =>
Res := Create_Node (N_Property_Instance);
when N_Boolean_Parameter