diff options
| author | Tristan Gingold <tgingold@free.fr> | 2019-11-08 19:29:52 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2019-11-11 20:25:11 +0100 |
| commit | f6ee4a75bfba5341a9116193810c5ccf771d1cf0 (patch) | |
| tree | 18fab110c29f13c9982e9cd6856fc88c14112b9a /src/files_map-editor.adb | |
| parent | 207b7fb44c667af87c5f8e4ab20652fcaaf1849e (diff) | |
| download | ghdl-f6ee4a75bfba5341a9116193810c5ccf771d1cf0.tar.gz ghdl-f6ee4a75bfba5341a9116193810c5ccf771d1cf0.tar.bz2 ghdl-f6ee4a75bfba5341a9116193810c5ccf771d1cf0.zip | |
dyn_tables: move Table_Initial generic to argument of
Diffstat (limited to 'src/files_map-editor.adb')
| -rw-r--r-- | src/files_map-editor.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/files_map-editor.adb b/src/files_map-editor.adb index 578425fa8..63a72f460 100644 --- a/src/files_map-editor.adb +++ b/src/files_map-editor.adb @@ -51,7 +51,7 @@ package body Files_Map.Editor is P : Source_Ptr; Nl : Natural; begin - Lines_Tables.Init (F.Lines); + Lines_Tables.Init (F.Lines, Lines_Table_Init); L := 1; P := Source_Ptr_Org; @@ -414,7 +414,7 @@ package body Files_Map.Editor is -- Reset line table. Lines_Tables.Free (F.Lines); - Lines_Tables.Init (F.Lines); + Lines_Tables.Init (F.Lines, Lines_Table_Init); File_Add_Line_Number (File, 1, Source_Ptr_Org); end Fill_Text_Ptr; |