Differences From 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]
To Artifact [44bdbebcd7]:
- File src/natools-s_expressions.ads — part of check-in [e76def5969] at 2015-04-10 21:14:11 on branch trunk — s_expressions: add equality operator on atoms, so clients don't have to depend on Ada.Streams (user: nat, size: 5537) [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 "<" (Left, Right : Atom) return Boolean
renames Ada.Streams."<";
function Less_Than (Left, Right : Atom) return Boolean;
-----------------------------
|
| ︙ |