From f6ee4a75bfba5341a9116193810c5ccf771d1cf0 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Fri, 8 Nov 2019 19:29:52 +0100 Subject: dyn_tables: move Table_Initial generic to argument of --- src/files_map-editor.adb | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/files_map-editor.adb') 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; -- cgit v1.2.3