libadalang_tools_24.0.0_d864b5a8/testsuite/tests/pp/issue_39/test.adb

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
with Ada.Containers.Indefinite_Ordered_Maps;

package Test is
   package Source_Expected_Map is new Ada.Containers.Indefinite_Ordered_Maps
     (Key_Type     => String,
      Element_Type => Integer,
      "="          => "=");

  Map :
   Source_Expected_Map.Map :=
    ["d.",
      1];

end Test;