diff options
| author | Tristan Gingold <tgingold@free.fr> | 2019-05-30 14:28:12 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2019-05-30 14:28:12 +0200 |
| commit | ad46e4bed268a9c4faefb503deec7dc5603a9be2 (patch) | |
| tree | d7557d67b2b4539426a3ea008e9655233214604f /src/ghdldrv/ghdlprint.adb | |
| parent | 5ca1572dbef924b659e7ecc912686d3941b5ae30 (diff) | |
| download | ghdl-ad46e4bed268a9c4faefb503deec7dc5603a9be2.tar.gz ghdl-ad46e4bed268a9c4faefb503deec7dc5603a9be2.tar.bz2 ghdl-ad46e4bed268a9c4faefb503deec7dc5603a9be2.zip | |
vhdl: differenciate block and line comments.
Diffstat (limited to 'src/ghdldrv/ghdlprint.adb')
| -rw-r--r-- | src/ghdldrv/ghdlprint.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/ghdldrv/ghdlprint.adb b/src/ghdldrv/ghdlprint.adb index a35ad5fbb..6d1d8d5e5 100644 --- a/src/ghdldrv/ghdlprint.adb +++ b/src/ghdldrv/ghdlprint.adb @@ -368,7 +368,8 @@ package body Ghdlprint is New_Line; Line := Line + 1; Disp_Ln; - when Tok_Comment => + when Tok_Line_Comment + | Tok_Block_Comment => Disp_Spaces; case Html_Format is when Html_2 => |