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