Differences From Artifact [4923890aab]:

• File src/natools-s_expressions-interpreters.ads — part of check-in [4627abed57] at 2014-05-10 20:43:18 on branch trunk — s_expressions-atom_refs: new package for atom references, taken out from Atom_Buffers (user: nat size: 4778)

To Artifact [4e8e3fffbf]:

• File src/natools-s_expressions-interpreters.ads — part of check-in [179da1f3db] at 2014-05-11 20:04:28 on branch trunk — s_expressions-interpreters: add a String-based command addition, since it's the overwhelmingly most common use case (user: nat size: 4884)

67
68
69
70
71
72
73





74
75
76
77
78
79
80

67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85

+
+
+
+
+

   type Interpreter is new Command with private;

   procedure Add_Command
     (Self : in out Interpreter;
      Name : in Atom;
      Cmd : in Command'Class);

   procedure Add
     (Self : in out Interpreter;
      Name : in String;
      Cmd : in Command'Class);

   function Has_Command (Self : Interpreter; Name : Atom) return Boolean;

   function Is_Empty (Self : Interpreter) return Boolean;

   procedure Set_Fallback
     (Self : in out Interpreter;
      Name : in Atom);