adayaml_0.3.0_ab19e387/src/interface/yaml-transformator.ads

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
--  part of AdaYaml, (c) 2017 Felix Krause
--  released under the terms of the MIT license, see the file "copying.txt"

with Ada.Finalization;

package Yaml.Transformator is
   type Instance is abstract tagged limited private;
   type Pointer is access Instance'Class;

   procedure Put (Object : in out Instance; E : Event) is abstract;

   function Has_Next (Object : Instance) return Boolean is abstract;

   function Next (Object : in out Instance) return Event is abstract;
private
   type Instance is abstract limited new Ada.Finalization.Limited_Controlled
     with null record;
end Yaml.Transformator;