binder.ads (546B)
with Ada.Containers.Indefinite_Hashed_Maps;
with Ada.Strings.Unbounded; use Ada.Strings.Unbounded;
with Ada.Strings.Hash;
with Types; use Types;
package Binder is
---------
-- sem --
---------
type Sem is record
Scope : AST_Scope_Ref;
AST : Declaration_Vectors.Vector;
end record;
----------
-- init --
----------
function Init (AST : Declaration_Vectors.Vector) return Sem;
--------------
-- analysis --
--------------
procedure Analysis (S : in out Sem);
end Binder;