aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/vhdl-prints.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl/vhdl-prints.adb')
-rw-r--r--src/vhdl/vhdl-prints.adb3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/vhdl/vhdl-prints.adb b/src/vhdl/vhdl-prints.adb
index 59f25a08d..22bfa05cd 100644
--- a/src/vhdl/vhdl-prints.adb
+++ b/src/vhdl/vhdl-prints.adb
@@ -1959,7 +1959,8 @@ package body Vhdl.Prints is
end;
when N_Name_Decl =>
Disp_Ident (Ctxt, Get_Identifier (N));
- when N_HDL_Expr =>
+ when N_HDL_Expr
+ | N_HDL_Bool =>
Print (Ctxt, Vhdl_Node (PSL.Nodes.Get_HDL_Node (N)));
-- FIXME: this is true only when using the scanner.
-- Print_Expr (Node (Get_HDL_Node (N)));