From f9bc26ce709fcd83288fb6298741dd10bda66a8b Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Thu, 30 Apr 2020 11:45:05 +1000 Subject: Preelaborate and related Pragmas --- src/directed_graphs.adb | 13 ------------- 1 file changed, 13 deletions(-) (limited to 'src/directed_graphs.adb') diff --git a/src/directed_graphs.adb b/src/directed_graphs.adb index 7641d75..3446247 100644 --- a/src/directed_graphs.adb +++ b/src/directed_graphs.adb @@ -10,19 +10,6 @@ package body Directed_Graphs is - generic - type Base_Type is private; - type Array_Type is array (Positive range <>) of Base_Type; - with package Type_Vectors is new Ada.Containers.Vectors - (Index_Type => Positive, - Element_Type => Base_Type); - function Vector_To_Array - (Input : in Type_Vectors.Vector) - return Array_Type; - - - - --------- -- "<" -- --------- -- cgit