diff options
| author | T. Meissner <programming@goodcleanfun.de> | 2022-08-04 11:19:03 +0200 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2022-08-04 11:19:03 +0200 |
| commit | 409d1e9daa94d8a69f8c99bbb2b0acc791a382a6 (patch) | |
| tree | 0c5daa15488535c0e4d94755d182888631c5dce8 /src/psl | |
| parent | 6d8dbed5efcbbabbc886beb9a0291e43013010bc (diff) | |
| download | ghdl-409d1e9daa94d8a69f8c99bbb2b0acc791a382a6.tar.gz ghdl-409d1e9daa94d8a69f8c99bbb2b0acc791a382a6.tar.bz2 ghdl-409d1e9daa94d8a69f8c99bbb2b0acc791a382a6.zip | |
PSL: Add handling of N_HDL_Bool to Dump_Expr procedure (#2158)
Diffstat (limited to 'src/psl')
| -rw-r--r-- | src/psl/psl-prints.adb | 3 |
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 |