diff options
Diffstat (limited to 'src/synth/elab-vhdl_values-debug.adb')
| -rw-r--r-- | src/synth/elab-vhdl_values-debug.adb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/synth/elab-vhdl_values-debug.adb b/src/synth/elab-vhdl_values-debug.adb index a7cf2f9a3..bd174f6b0 100644 --- a/src/synth/elab-vhdl_values-debug.adb +++ b/src/synth/elab-vhdl_values-debug.adb @@ -304,6 +304,10 @@ package body Elab.Vhdl_Values.Debug is New_Line; when Value_File => Put_Line ("a file"); + when Value_Quantity => + Put ("quantity "); + Put_Uns32 (Uns32 (V.Val.Q)); + New_Line; when Value_Alias => Put ("an alias: "); Debug_Typ1 (V.Typ); |