summaryrefslogtreecommitdiff
path: root/src/packrat-traits.adb
blob: 2058a4feb5d94653397dd67cf8f9875f6b024fd8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23


--  This source is licensed under the Sunset License v1.0


package body Packrat.Traits is


    function "<"
           (Left, Right : in Element_Array)
        return Boolean
    is
        function LT is new Array_Less_Than
           (Base_Type  => Element_Type,
            Array_Type => Element_Array);
    begin
        return LT (Left, Right);
    end "<";


end Packrat.Traits;