aboutsummaryrefslogtreecommitdiffstats
path: root/src/psl
diff options
context:
space:
mode:
Diffstat (limited to 'src/psl')
-rw-r--r--src/psl/psl-prints.adb3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/psl/psl-prints.adb b/src/psl/psl-prints.adb
index 6c2cffa48..a810d751a 100644
--- a/src/psl/psl-prints.adb
+++ b/src/psl/psl-prints.adb
@@ -104,7 +104,8 @@ package body PSL.Prints is
is
begin
case Get_Kind (N) is
- when N_HDL_Expr =>
+ when N_HDL_Expr
+ | N_HDL_Bool =>
if HDL_Expr_Printer = null then
Put ("Expr");
else