Differences From Artifact [18694bf840]:
- File src/natools-s_expressions.ads — part of check-in [6f257a4f4d] at 2014-05-08 18:36:49 on branch trunk — Move atom comparison function from Natools.S_Expressions.Interpreters to Natools.S_Expressions (user: nat, size: 5373) [annotate] [blame] [check-ins using]
To Artifact [99a62d27e0]:
- File src/natools-s_expressions.ads — part of check-in [62ca3fd9c9] at 2014-12-02 22:07:01 on branch trunk — s_expressions: add usual lexicographical comparison operator on Atoms, so that clients don't have to explicitly use Ada.Streams."<" (user: nat, size: 5455) [annotate] [blame] [check-ins using]
︙ | |||
53 54 55 56 57 58 59 60 61 62 63 64 65 66 | 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 | + + | subtype Atom is Ada.Streams.Stream_Element_Array; Null_Atom : constant Atom (1 .. 0) := (others => <>); function To_String (Data : in Atom) return String; function To_Atom (Data : in String) return Atom; function "<" (Left, Right : Atom) return Boolean renames Ada.Streams."<"; function Less_Than (Left, Right : Atom) return Boolean; ----------------------------- -- S-expression Descriptor -- ----------------------------- |
︙ |