diff options
| author | Tristan Gingold <tgingold@free.fr> | 2016-09-01 06:25:29 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2016-09-01 06:31:10 +0200 |
| commit | a7f63a8a08aeaef263c7d4a404d7d827cac89b9a (patch) | |
| tree | e9e1912aab5f92df11fa36b956e46c174d0c4f4a /src/ghdldrv/ghdlprint.adb | |
| parent | 2566852c5601fd03f4a9c6b5939d30a56d919c5d (diff) | |
| download | ghdl-a7f63a8a08aeaef263c7d4a404d7d827cac89b9a.tar.gz ghdl-a7f63a8a08aeaef263c7d4a404d7d827cac89b9a.tar.bz2 ghdl-a7f63a8a08aeaef263c7d4a404d7d827cac89b9a.zip | |
ghdlprint: remove useless duplicate call.
Diffstat (limited to 'src/ghdldrv/ghdlprint.adb')
| -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; |