Differences From Artifact [36f18e7166]:

• File src/natools-s_expressions-interpreters.ads — part of check-in [6e4b5836c5] at 2014-03-12 21:26:44 on branch trunk — s_expression-interpreters: new package providing a S-expression interpreter which dispatch to client-provided commands (user: nat size: 4603)

To Artifact [5caad76e31]:

• File src/natools-s_expressions-interpreters.ads — part of check-in [2ee5aec7e2] at 2014-03-15 20:20:48 on branch trunk — s_expressions-interpreters: add inspection functions Has_Command and Is_Empty (user: nat size: 4737)

61
62
63
64
65
66
67




68
69
70
71
72
73
74

61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78

+
+
+
+

   type Interpreter is new Command with private;

   procedure Add_Command
     (Self : in out Interpreter;
      Name : in Atom;
      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);

   procedure Reset_Fallback (Self : in out Interpreter);