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) [annotate] [blame] [check-ins using]
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) [annotate] [blame] [check-ins using]
| ︙ | |||
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);
|
| ︙ |