1 2 3 4 5 6 7 8 9 10 11 12 | with Ada.Containers.Doubly_Linked_Lists; with System; private package Agpl.Http.Server.Sort_handler.Aux is -- This ugly workaround is needed because I can't instantiate a Charles -- package using a generic type within a generic body. package Address_lists is new Ada.Containers.Doubly_Linked_Lists ( System.Address, System."="); end Agpl.Http.Server.Sort_handler.Aux; |