diff options
| -rw-r--r-- | src/ghdldrv/ghdlprint.adb | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/src/ghdldrv/ghdlprint.adb b/src/ghdldrv/ghdlprint.adb index 76a423bcb..9df87930b 100644 --- a/src/ghdldrv/ghdlprint.adb +++ b/src/ghdldrv/ghdlprint.adb @@ -762,8 +762,6 @@ package body Ghdlprint is raise Internal_Error; end if; - Location_To_File_Pos - (Get_End_Location (Unit), File_Entry, Lend); -- Find the ';'. while Buffer (Lend) /= ';' loop Lend := Lend + 1; |